mailmun1.dfm

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

object Form1: TForm1
  Left = 47
  Top = 159
  Width = 790
  Height = 552
  Caption = 'WPTools Mail-Merge Demo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 120
  TextHeight = 16
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 782
    Height = 518
    ActivePage = TabSheet2
    Align = alClient
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = 'Data - Table View'
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 774
        Height = 50
        Align = alTop
        TabOrder = 0
        object DBNavigator1: TDBNavigator
          Left = 12
          Top = 11
          Width = 290
          Height = 31
          DataSource = DataSource1
          TabOrder = 0
        end
        object OpenTable: TButton
          Left = 314
          Top = 12
          Width = 244
          Height = 31
          Caption = 'Open Table'
          TabOrder = 1
          OnClick = OpenTableClick
        end
      end
      object DBGrid1: TDBGrid
        Left = 0
        Top = 50
        Width = 774
        Height = 437
        Align = alClient
        DataSource = DataSource1
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -14
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'Mailmerge Template'
      object Panel2: TPanel
        Left = 558
        Top = 0
        Width = 216
        Height = 487
        Align = alRight
        BevelOuter = bvLowered
        TabOrder = 0
        object InsertField: TButton
          Left = 15
          Top = 30
          Width = 190
          Height = 30
          Caption = 'Insert Field'
          TabOrder = 0
          OnClick = InsertFieldClick
        end
        object FieldList: TListBox
          Left = 14
          Top = 70
          Width = 189
          Height = 230
          ItemHeight = 16
          TabOrder = 1
        end
        object DBNavigator2: TDBNavigator
          Left = 14
          Top = 309
          Width = 192
          Height = 31
          DataSource = DataSource1
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
          TabOrder = 2
        end
        object ShowFields: TCheckBox
          Left = 20
          Top = 354
          Width = 119
          Height = 21
          Caption = 'ShowFields'
          Checked = True
          State = cbChecked
          TabOrder = 3
          OnClick = ShowFieldsClick
        end
        object DeleteFields: TButton
          Left = 16
          Top = 3
          Width = 188
          Height = 25
          Caption = 'Delete Fields'
          TabOrder = 4
          OnClick = DeleteFieldsClick
        end
      end
      object Panel3: TPanel
        Left = 0
        Top = 0
        Width = 558
        Height = 487
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 1
        object WPRichText1: TWPRichText
          Left = 26
          Top = 112
          Width = 532
          Height = 375
          Cursor = crIBeam
          RTFText.Data = {
            7B5C727466315C616E73695C64656666305C6465667461623235347B5C666F6E
            7474626C7B5C66305C666E696C5C66636861727365743020417269616C3B7D7B
            5C66315C666E696C5C66636861727365743020417269616C3B7D7B5C66325C66
            6E696C5C66636861727365743020417269616C3B7D7B5C66335C666E696C5C66
            63686172736574322057696E6744696E67733B7D7D7B5C636F6C6F7274626C5C
            726564305C677265656E305C626C7565303B5C7265643235355C677265656E30
            5C626C7565303B5C726564305C677265656E3132385C626C7565303B5C726564
            305C677265656E305C626C75653235353B5C7265643235355C677265656E3235
            355C626C7565303B5C7265643235355C677265656E305C626C75653235353B5C
            7265643132385C677265656E305C626C75653132383B5C7265643132385C6772
            65656E305C626C7565303B5C726564305C677265656E3235355C626C7565303B
            5C726564305C677265656E3235355C626C75653235353B5C726564305C677265
            656E3132385C626C75653132383B5C726564305C677265656E305C626C756531
            32383B5C7265643235355C677265656E3235355C626C75653235353B5C726564
            3139325C677265656E3139325C626C75653139323B5C7265643132385C677265
            656E3132385C626C75653132383B5C726564305C677265656E305C626C756530
            3B7D5C7770707268656164666F6F74305C70617065727731323234305C706170
            65726831353834305C6D6172676C313838305C6D61726772313838305C6D6172
            6774313434305C6D61726762313434305C686561646572793732305C666F6F74
            6572793732307B5C2A5C6C6973747461626C657B5C6C6973745C6C6973747465
            6D706C617465696431393639303231327B5C6C6973746C6576656C5C6C657665
            6C6A63305C6C6576656C666F6C6C6F77305C6C6576656C73746172746174315C
            6C6576656C7370616365305C6C6576656C696E64656E743336305C6C6576656C
            6E6663317B5C6C6576656C746578745C2730325C2730302E3B7D7B5C6C657665
            6C6E756D626572735C2730313B7D7D0D0A7B5C6C6973746C6576656C5C6C6576
            656C6A63305C6C6576656C666F6C6C6F77305C6C6576656C7374617274617431
            5C6C6576656C7370616365305C6C6576656C696E64656E743336305C6C657665
            6C6E6663337B5C6C6576656C746578745C2730325C2730312E3B7D7B5C6C6576
            656C6E756D626572735C2730313B7D7D0D0A7B5C6C6973746C6576656C5C6C65
            76656C6A63305C6C6576656C666F6C6C6F77305C6C6576656C73746172746174
            315C6C6576656C7370616365305C6C6576656C696E64656E743336305C6C6576
            656C6E6663307B5C6C6576656C746578745C2730325C2730322E3B7D7B5C6C65
            76656C6E756D626572735C2730313B7D7D0D0A7B5C6C6973746C6576656C5C6C
            6576656C6A63305C6C6576656C666F6C6C6F77305C6C6576656C737461727461
            74315C6C6576656C7370616365305C6C6576656C696E64656E743336305C6C65
            76656C6E6663347B5C6C6576656C746578745C2730325C273033293B7D7B5C6C
            6576656C6E756D626572735C2730313B7D7D0D0A7B5C6C6973746C6576656C5C
            6C6576656C6A63305C6C6576656C666F6C6C6F77305C6C6576656C7374617274
            6174315C6C6576656C7370616365305C6C6576656C696E64656E743336305C6C
            6576656C6E6663327B5C6C6576656C746578745C2730325C273034293B7D7B5C
            6C6576656C6E756D626572735C2730313B7D7D0D0A7B5C6C6973746C6576656C
            5C6C6576656C6A63305C6C6576656C666F6C6C6F77305C6C6576656C73746172
            746174315C6C6576656C7370616365305C6C6576656C696E64656E743336305C
            6C6576656C6E6663347B5C6C6576656C746578745C2730325C273035293B7D7B
            5C6C6576656C6E756D626572735C2730313B7D7D0D0A7B5C6C6973746C657665
            6C5C6C6576656C6A63305C6C6576656C666F6C6C6F77305C6C6576656C737461
            72746174315C6C6576656C7370616365305C6C6576656C696E64656E74333630
            5C6C6576656C6E6663307B5C6C6576656C746578745C2730325C273036293B7D
            7B5C6C6576656C6E756D626572735C2730313B7D7D0D0A7B5C6C6973746C6576
            656C5C6C6576656C6A63305C6C6576656C666F6C6C6F77305C6C6576656C7374
            6172746174315C6C6576656C7370616365305C6C6576656C696E64656E743336
            305C6C6576656C6E6663307B5C6C6576656C746578745C2730325C273037293B
            7D7B5C6C6576656C6E756D626572735C2730313B7D7D0D0A7B5C6C6973746C65
            76656C5C6C6576656C6A63305C6C6576656C666F6C6C6F77305C6C6576656C73
            746172746174315C6C6576656C7370616365305C6C6576656C696E64656E7433
            36305C6C6576656C6E6663307B5C6C6576656C746578745C2730325C27303829
            3B7D7B5C6C6576656C6E756D626572735C2730313B7D7D0D0A5C6C6973746964
            313139343733377D7D7B5C2A5C6C6973746F766572726964657461626C657B5C
            6C6973746F766572726964655C6C6973746964313139343733375C6C6973746F
            76657272696465636F756E74305C6C73317D7D5C656E646E686572655C736563
            7464656661756C74636C7B5C706172647B5C747831373130205C716C5C6C6930
            5C6669305C7269305C7362305C736C5C736130205C706C61696E5C66315C6673
            32305C6366325C756C204D61696C6D657267652074656D706C61746520666F72
            20746865205C706C61696E5C66315C667332305C6366325C625C756C2062696F
            6C696665205C706C61696E5C66315C667332305C6366325C756C2064656D6F20
            64617461626173655C7061720D0A5C716C5C6C69305C6669305C7269305C7362
            305C736C5C736130205C706C61696E5C66315C667332305C636630204E6F3A5C
            746162205C706C61696E5C66315C667332305C6366305C62207B5C6669656C64
            7B5C2A5C666C64696E73747B4D455247454649454C442022537065636965735C
            2732304E6F22207D7D3C7D5C7061720D0A5C716C5C6C69305C6669305C726930
            5C7362305C736C5C736130205C706C61696E5C66315C667332305C6366302043
            617465676F72793A5C746162205C706C61696E5C66315C667332305C63663020
            7B5C6669656C647B5C2A5C666C64696E73747B4D455247454649454C44204361
            7465676F7279207D7D3C7D5C7061720D0A5C716C5C6C69305C6669305C726930
            5C7362305C736C5C736130205C706C61696E5C66315C667332305C6366302043
            6F6D6D6F6E204E616D653A5C746162205C706C61696E5C66315C667332305C63
            6630207B5C6669656C647B5C2A5C666C64696E73747B4D455247454649454C44
            20436F6D6D6F6E5F4E616D65207D7D3C7D5C7061720D0A5C716C5C6C69305C66
            69305C7269305C7362305C736C5C736130205C706C61696E5C66315C66733230
            5C6366302053706563696573204E616D653A5C746162205C706C61696E5C6631
            5C667332305C636630207B5C6669656C647B5C2A5C666C64696E73747B4D4552
            47454649454C442022537065636965735C2732304E616D6522207D7D3C7D5C70
            61720D0A5C716C5C6C69305C6669305C7269305C7362305C736C5C736130205C
            706C61696E5C66315C667332305C63663020506963747572653A5C746162205C
            706C61696E5C66315C667332305C636630207B5C6669656C647B5C2A5C666C64
            696E73747B4D455247454649454C442047726170686963207D7D3C7D5C706172
            0D0A5C716C5C6C69305C6669305C7269305C7362305C736C5C736130205C706C
            61696E5C66315C667332305C636630204E6F7465733A5C746162205C706C6169
            6E5C66315C667332305C636630207B5C6669656C647B5C2A5C666C64696E7374
            7B4D455247454649454C44204E6F746573207D7D3C5C706C61696E5C66315C66
            7332305C636630203E7D5C7061720D0A5C716C5C6C69305C6669305C7269305C
            7362305C736C5C736130205C706C61696E5C66315C667332305C636630207D7D
            0D0A7D00000000}
          Header.DefaultTabstop = 254
          RTFVariables = <>
          SpellCheckStrategie = wpspCheckInInit
          WPToolBar = WPToolBar1
          WPRuler = WPRuler1
          GraphicPopupMenu = WPDefAct.GraphicPopupMenu
          ActionList = WPDefAct.StdActions
          XOffset = 144
          YOffset = 141
          XBetween = 144
          YBetween = 144
          LayoutMode = wplayFullLayout
          ScrollBars = ssBoth
          EditOptions = [wpTableResizing, wpTableColumnResizing, wpObjectMoving, wpObjectResizingWidth, wpObjectResizingHeight, wpObjectResizingKeepRatio, wpObjectSelecting, wpObjectDeletion, wpSpreadsheetCursorMovement, wpActivateUndo, wpActivateUndoHotkey, wpActivateRedo, wpActivateRedoHotkey, wpMoveCPOnPageUpDown]
          ClipboardOptions = []
          ProtectedProp = []
          HyperLinkCursor = crArrow
          TextObjectCursor = crHandPoint
          InsertPointAttr.Bold = tsIgnore
          InsertPointAttr.Italic = tsIgnore
          InsertPointAttr.DoubleUnderline = False
          InsertPointAttr.Underline = tsIgnore
          InsertPointAttr.StrikeOut = tsIgnore
          InsertPointAttr.StrikeOutColor = clBlack
          InsertPointAttr.SuperScript = tsIgnore
          InsertPointAttr.SubScript = tsIgnore
          InsertPointAttr.Hidden = False
          InsertPointAttr.UnderlineColor = clBlack
          InsertPointAttr.TextColor = clRed
          InsertPointAttr.BackgroundColor = 13041663
          InsertPointAttr.UseUnderlineColor = False
          InsertPointAttr.UseTextColor = True
          InsertPointAttr.UseBackgroundColor = True
          InsertPointAttr.HotEffect = wpeffOutline
          InsertPointAttr.HotStyleIsActive = True
          InsertPointAttr.HotEffectColor = 33023
          HyperlinkTextAttr.Bold = tsIgnore
          HyperlinkTextAttr.Italic = tsIgnore
          HyperlinkTextAttr.DoubleUnderline = False
          HyperlinkTextAttr.Underline = tsIgnore
          HyperlinkTextAttr.StrikeOut = tsIgnore
          HyperlinkTextAttr.StrikeOutColor = clBlack
          HyperlinkTextAttr.SuperScript = tsIgnore
          HyperlinkTextAttr.SubScript = tsIgnore
          HyperlinkTextAttr.Hidden = False
          HyperlinkTextAttr.UnderlineColor = clBlue
          HyperlinkTextAttr.TextColor = clBlack
          HyperlinkTextAttr.BackgroundColor = clBlack
          HyperlinkTextAttr.UseUnderlineColor = False
          HyperlinkTextAttr.UseTextColor = False
          HyperlinkTextAttr.UseBackgroundColor = False
          HyperlinkTextAttr.HotUnderlineColor = clRed
          HyperlinkTextAttr.HotBackgroundColor = clNavy
          HyperlinkTextAttr.UseHotBackgroundColor = True
          HyperlinkTextAttr.HotTextColor = clRed
          HyperlinkTextAttr.HotUnderline = tsTRUE
          HyperlinkTextAttr.HotStyleIsActive = True
          BookmarkTextAttr.Bold = tsIgnore
          BookmarkTextAttr.Italic = tsIgnore
          BookmarkTextAttr.DoubleUnderline = False
          BookmarkTextAttr.Underline = tsIgnore
          BookmarkTextAttr.StrikeOut = tsIgnore
          BookmarkTextAttr.StrikeOutColor = clBlack
          BookmarkTextAttr.SuperScript = tsIgnore
          BookmarkTextAttr.SubScript = tsIgnore
          BookmarkTextAttr.Hidden = False
          BookmarkTextAttr.UnderlineColor = clBlack
          BookmarkTextAttr.TextColor = clBlack
          BookmarkTextAttr.BackgroundColor = clBlack
          BookmarkTextAttr.UseUnderlineColor = False
          BookmarkTextAttr.UseTextColor = False
          BookmarkTextAttr.UseBackgroundColor = False
          SPANObjectTextAttr.Bold = tsIgnore
          SPANObjectTextAttr.Italic = tsIgnore
          SPANObjectTextAttr.DoubleUnderline = False
          SPANObjectTextAttr.Underline = tsIgnore
          SPANObjectTextAttr.StrikeOut = tsIgnore
          SPANObjectTextAttr.StrikeOutColor = clBlack
          SPANObjectTextAttr.SuperScript = tsIgnore
          SPANObjectTextAttr.SubScript = tsIgnore
          SPANObjectTextAttr.Hidden = False
          SPANObjectTextAttr.UnderlineColor = clBlack
          SPANObjectTextAttr.TextColor = clBlack
          SPANObjectTextAttr.BackgroundColor = clBlack
          SPANObjectTextAttr.UseUnderlineColor = False
          SPANObjectTextAttr.UseTextColor = False
          SPANObjectTextAttr.UseBackgroundColor = False
          HiddenTextAttr.Bold = tsIgnore
          HiddenTextAttr.Italic = tsIgnore
          HiddenTextAttr.DoubleUnderline = False
          HiddenTextAttr.Underline = tsIgnore
          HiddenTextAttr.StrikeOut = tsIgnore
          HiddenTextAttr.StrikeOutColor = clBlack
          HiddenTextAttr.SuperScript = tsIgnore
          HiddenTextAttr.SubScript = tsIgnore
          HiddenTextAttr.Hidden = True
          HiddenTextAttr.UnderlineColor = clBlack
          HiddenTextAttr.TextColor = clBlack
          HiddenTextAttr.BackgroundColor = clBlack
          HiddenTextAttr.UseUnderlineColor = False
          HiddenTextAttr.UseTextColor = False
          HiddenTextAttr.UseBackgroundColor = False
          AutomaticTextAttr.Bold = tsIgnore
          AutomaticTextAttr.Italic = tsIgnore
          AutomaticTextAttr.DoubleUnderline = False
          AutomaticTextAttr.Underline = tsIgnore
          AutomaticTextAttr.StrikeOut = tsIgnore
          AutomaticTextAttr.StrikeOutColor = clBlack
          AutomaticTextAttr.SuperScript = tsIgnore
          AutomaticTextAttr.SubScript = tsIgnore
          AutomaticTextAttr.Hidden = False
          AutomaticTextAttr.UnderlineColor = clBlack
          AutomaticTextAttr.TextColor = clBlack
          AutomaticTextAttr.BackgroundColor = clBlack
          AutomaticTextAttr.UseUnderlineColor = False
          AutomaticTextAttr.UseTextColor = False
          AutomaticTextAttr.UseBackgroundColor = False
          AutomaticTextAttr.HotBackgroundColor = 33023