calctu.dfm

wptools5 pro 完整源代码 Msword界面的文本编辑器源代码

    ProtectedTextAttr.UnderlineColor = clBlack
    ProtectedTextAttr.TextColor = clGray
    ProtectedTextAttr.BackgroundColor = clBlack
    ProtectedTextAttr.UseUnderlineColor = False
    ProtectedTextAttr.UseTextColor = True
    ProtectedTextAttr.UseBackgroundColor = False
    FieldObjectTextAttr.Bold = tsIgnore
    FieldObjectTextAttr.Italic = tsIgnore
    FieldObjectTextAttr.DoubleUnderline = False
    FieldObjectTextAttr.Underline = tsIgnore
    FieldObjectTextAttr.StrikeOut = tsIgnore
    FieldObjectTextAttr.StrikeOutColor = clBlack
    FieldObjectTextAttr.SuperScript = tsIgnore
    FieldObjectTextAttr.SubScript = tsIgnore
    FieldObjectTextAttr.Hidden = False
    FieldObjectTextAttr.UnderlineColor = clBlack
    FieldObjectTextAttr.TextColor = clBlack
    FieldObjectTextAttr.BackgroundColor = clBlack
    FieldObjectTextAttr.UseUnderlineColor = False
    FieldObjectTextAttr.UseTextColor = False
    FieldObjectTextAttr.UseBackgroundColor = False
    WriteObjectMode = wobStandard
    OneClickHyperlink = False
    Align = alClient
    TabOrder = 0
  end
  object Panel1: TPanel
    Left = 0
    Top = 375
    Width = 651
    Height = 194
    Align = alBottom
    TabOrder = 1
    OnResize = Panel1Resize
    object Bevel1: TBevel
      Left = 5
      Top = 97
      Width = 599
      Height = 7
      Shape = bsTopLine
      Style = bsRaised
    end
    object Bevel2: TBevel
      Left = 7
      Top = 141
      Width = 599
      Height = 7
      Shape = bsTopLine
      Style = bsRaised
    end
    object Label1: TLabel
      Left = 381
      Top = 155
      Width = 58
      Height = 16
      Caption = 'Increment'
    end
    object AplusBDemo: TButton
      Left = 10
      Top = 7
      Width = 181
      Height = 25
      Caption = 'A + B Demo'
      TabOrder = 0
      OnClick = AplusBDemoClick
    end
    object Recalc: TButton
      Left = 564
      Top = 7
      Width = 75
      Height = 25
      Caption = 'Recalc'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = RecalcClick
    end
    object AverageDemo: TButton
      Left = 10
      Top = 34
      Width = 180
      Height = 25
      Caption = 'Average Demo'
      TabOrder = 2
      OnClick = AverageDemoClick
    end
    object InvoiceDemo: TButton
      Left = 9
      Top = 62
      Width = 181
      Height = 25
      Caption = 'Invoice Demo'
      TabOrder = 3
      OnClick = InvoiceDemoClick
    end
    object DisplayParNames: TCheckBox
      Left = 201
      Top = 11
      Width = 198
      Height = 17
      Caption = 'Display Names and Formulas'
      TabOrder = 4
      OnClick = DisplayParNamesClick
    end
    object ListNames: TButton
      Left = 228
      Top = 32
      Width = 96
      Height = 25
      Caption = 'List Names'
      TabOrder = 5
      OnClick = ListNamesClick
    end
    object ListCommands: TButton
      Left = 228
      Top = 59
      Width = 96
      Height = 25
      Caption = 'List Formulas'
      TabOrder = 6
      OnClick = ListCommandsClick
    end
    object ListBox1: TListBox
      Left = 328
      Top = 31
      Width = 228
      Height = 55
      ItemHeight = 16
      TabOrder = 7
    end
    object CreateNamedTable: TButton
      Left = 15
      Top = 109
      Width = 176
      Height = 25
      Caption = 'Create Table "NAME" '
      TabOrder = 8
      OnClick = CreateNamedTableClick
    end
    object ModifyNamedTable: TButton
      Left = 193
      Top = 110
      Width = 176
      Height = 25
      Caption = 'Insert Row '
      TabOrder = 9
      OnClick = ModifyNamedTableClick
    end
    object ModifyNamedTable2: TButton
      Left = 371
      Top = 110
      Width = 197
      Height = 25
      Caption = 'Insert Row - alternative code'
      TabOrder = 10
      OnClick = ModifyNamedTable2Click
    end
    object CreateLongTable: TButton
      Left = 15
      Top = 152
      Width = 349
      Height = 25
      Caption = 'Create table with header/footer'
      TabOrder = 11
      OnClick = CreateLongTableClick
    end
    object IncEdit: TEdit
      Left = 447
      Top = 151
      Width = 83
      Height = 24
      TabOrder = 12
      Text = '0'
    end
  end
  object WPToolBar1: TWPToolBar
    Left = 0
    Top = 0
    Width = 651
    Height = 59
    ParentColor = False
    UseDockManager = False
    KeepGroupsTogether = True
    Align = alTop
    BevelLines = []
    AutoEnabling = True
    WidthBetweenGroups = 4
    FontChoice = fsPrinterFonts
    sel_ListBoxes = [SelFontName, SelFontSize, SelFontColor, SelParColor]
    sel_StatusIcons = [SelBold, SelItalic, SelUnder, SelProtected, SelLeft, SelRight, SelBlock, SelCenter]
    sel_ActionIcons = [SelOpen, SelSave, SelPrint, SelPrintSetup, SelFitWidth, SelFitHeight]
    sel_DatabaseIcons = []
    sel_EditIcons = [SelCopy, SelCut, SelPaste, SelFind, SelReplace]
    sel_TableIcons = []
    sel_OutlineIcons = []
    FontSizeFrom = 8
    FlatButtons = False
    ButtonHeight = 0
    TrueTypeOnly = False
    object Button1: TButton
      Left = 224
      Top = 29
      Width = 102
      Height = 25
      Caption = 'Reload WPT'
      TabOrder = 0
      Visible = False
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 328
      Top = 29
      Width = 118
      Height = 25
      Caption = 'Reload RTF'
      TabOrder = 5
      Visible = False
    end
  end
end