wpreptest.dfm

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

object WPRepForm: TWPRepForm
  Left = 60
  Top = 144
  Width = 841
  Height = 655
  Caption = 'WPReporter Demo (with WPTools V5)'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnShow = Button1Click
  PixelsPerInch = 120
  TextHeight = 16
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 833
    Height = 621
    ActivePage = TabSheet3
    Align = alClient
    TabOrder = 0
    OnChange = PageControl1Change
    object TabSheet1: TTabSheet
      Caption = 'About WPReporter'
      object Description: TWPRichText
        Left = 0
        Top = 0
        Width = 765
        Height = 453
        RTFText.Data = {
          3C215750546F6F6C735F466F726D617420563D3530303E0D0A3C476C6F62616C
          50616765466F726D61742077706373733D224C616E6473636170653A303B7061
          706572773A31323234303B7061706572683A31353834303B6D617267723A3138
          38303B6D6172676C3A313838303B6D617267743A313434303B6D617267623A31
          3434303B6D6172675F6865616465723A3732303B6D6172675F666F6F7465723A
          3732303B64656674616273746F703A303B6D617267696E6D6972726F723A303B
          222F3E3C6469762077707374793D5B5B496E64656E744C6566743A3331323B49
          6E64656E7452696768743A3633363B5D5D3E3C6373206E723D31207770737479
          3D5B5B43686172466F6E7453697A653A313030303B436861725374796C654D61
          736B3A313B436861725374796C654F4E3A313B5D5D2F3E3C63206E723D312F3E
          576861742069732057505265706F727465723F3C2F6469763E0D0A3C64697620
          77707374793D5B5B496E64656E744C6566743A3331323B496E64656E74526967
          68743A3633363B5D5D3E3C2F6469763E0D0A3C6469762077707374793D5B5B49
          6E64656E744C6566743A3331323B496E64656E7452696768743A3633363B5D5D
          3E3C6373206E723D322077707374793D5B5B43686172466F6E7453697A653A31
          3030303B5D5D2F3E3C63206E723D322F3E57505265706F727465722069732061
          6E206164646F6E20746F6F6C20746F205750546F6F6C7320746F206372656174
          6520646F63756D656E7473207573696E6720612074656D706C61746520646F63
          756D656E7420616E6420646174612066726F6D20646966666572656E7420736F
          75726365732E203C2F6469763E0D0A3C6469762077707374793D5B5B496E6465
          6E744C6566743A3331323B496E64656E7452696768743A3633363B5D5D3E3C2F
          6469763E0D0A3C6469762077707374793D5B5B496E64656E744C6566743A3331
          323B496E64656E7452696768743A3633363B5D5D3E3C63206E723D322F3E4120
          74656D706C61746520636F6E7369737473206F66207465787420776869636820
          697320737065726174656420696E746F20646966666572656E74207061727473
          207573696E672062616E647320616E642067726F7570732E20556E6C696B6520
          67726F7570732C2062616E64732028646174612C20686561646572206F722066
          6F6F7465722920616C7761797320656E64207769746820746865207374617274
          206F6620746865206E6578742062616E64206F722067726F75702E202047726F
          75707320656E6420776974682074686520636C6F73696E67206F662074686520
          67726F7570202D20746865792063616E20616C736F206265206E65737465642E
          3C2F6469763E0D0A3C6469762077707374793D5B5B496E64656E744C6566743A
          3331323B496E64656E7452696768743A3633363B5D5D3E3C2F6469763E0D0A3C
          6469762077707374793D5B5B496E64656E744C6566743A3331323B496E64656E
          7452696768743A3633363B5D5D3E3C63206E723D322F3E447572696E67207468
          6520637265617465206F662074686520646F63756D656E742028696E73696465
          207468652064657374696E6174696F6E20636F6E74726F6C2920746865207072
          6F63657373696E67206F6620656163682062616E642063616E20626520737769
          7463686564206F666620616E6420656163682067726F75702063616E20626520
          7265706561746564206173206F6674656E2061732072657175697265642E203C
          2F6469763E0D0A3C6469762077707374793D5B5B496E64656E744C6566743A33
          31323B496E64656E7452696768743A3633363B5D5D3E3C2F6469763E0D0A3C64
          69762077707374793D5B5B496E64656E744C6566743A3331323B496E64656E74
          52696768743A3633363B5D5D3E3C63206E723D322F3E4166746572206F6E6520
          706172616772617068206F66207468652074656D706C61746520686173206265
          656E20636F7069656420746F207468652064657374696E6174696F6E20636F6E
          74726F6C20746865206669656C647320696E2074686973207061726167726170
          687320617265207265706C6163656420627920646174612076616C7565732E20
          5468697320776F726B20697320706572666F726D656420627920746865206D61
          696C206D657267652066756E6374696F6E2077686963682063616E2062652061
          6C736F207573656420776974686F75742057505265706F727465722E20546865
          206D61696C6D657267652066756E6374696F6E20747269676765727320746865
          204F6E4D61696C654D6572676547657454657874206576656E7420666F722065
          616368206669656C6420776869636820697320666F756E6420696E2074686520
          746578742E20496E7369646520746865206576656E7420746865206461746120
          63616E2062652061737369676E656420746F20746865206F626A656374207768
          696368206973207573656420746F207472616E73666572207468652064617461
          2C20616E20696D6167652063616E20626520696E736572746564206F72207468
          65207465787420666F726D61742063616E206265206368616E6765642E3C2F64
          69763E0D0A3C6469762077707374793D5B5B496E64656E744C6566743A333132
          3B496E64656E7452696768743A3633363B5D5D3E3C63206E723D322F3E203C2F
          6469763E0D0A}
        Header.DefaultTabstop = 0
        RTFVariables = <>
        SpellCheckStrategie = wpspCheckInInit
        XOffset = 144
        YOffset = 144
        XBetween = 144
        YBetween = 144
        LayoutMode = wplayFullLayout
        ScrollBars = ssNone
        EditOptions = [wpTableResizing, wpTableColumnResizing, wpObjectMoving, wpObjectResizingWidth, wpObjectResizingHeight, wpObjectResizingKeepRatio, wpObjectSelecting, wpObjectDeletion, wpSpreadsheetCursorMovement, wpActivateUndo, wpActivateUndoHotkey, wpMoveCPOnPageUpDown]
        ClipboardOptions = []
        EditBoxModes = [wpemLimitTextWidth]
        WordWrap = True
        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 = clBlack
        InsertPointAttr.UseUnderlineColor = False
        InsertPointAttr.UseTextColor = True
        InsertPointAttr.UseBackgroundColor = False
        HyperlinkTextAttr.Bold = tsIgnore
        HyperlinkTextAttr.Italic = tsIgnore
        HyperlinkTextAttr.DoubleUnderline = False
        HyperlinkTextAttr.Underline = tsTRUE
        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 = True
        HyperlinkTextAttr.UseTextColor = False
        HyperlinkTextAttr.UseBackgroundColor = False
        HyperlinkTextAttr.HotUnderlineColor = clRed
        HyperlinkTextAttr.UseHotUnderlineColor = True
        HyperlinkTextAttr.HotTextColor = clRed
        HyperlinkTextAttr.UseHotTextColor = True
        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
        ProtectedTextAttr.Bold = tsIgnore
        ProtectedTextAttr.Italic = tsIgnore
        ProtectedTextAttr.DoubleUnderline = False
        ProtectedTextAttr.Underline = tsIgnore
        ProtectedTextAttr.StrikeOut = tsIgnore
        ProtectedTextAttr.StrikeOutColor = clBlack
        ProtectedTextAttr.SuperScript = tsIgnore
        ProtectedTextAttr.SubScript = tsIgnore
        ProtectedTextAttr.Hidden = False
        ProtectedTextAttr.UnderlineColor = clBlack
        ProtectedTextAttr.TextColor = clBlack
        ProtectedTextAttr.BackgroundColor = clBlack
        ProtectedTextAttr.UseUnderlineColor = False
        ProtectedTextAttr.UseTextColor = False
        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
    end
    object TabSheet2: TTabSheet
      Caption = 'Demo Data'
      ImageIndex = 1
      object Label1: TLabel
        Left = 11
        Top = 8
        Width = 349
        Height = 50
        Caption = 
          'Each line in this memo control simulates data field in one data ' +
          'base row.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -20
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        WordWrap = True
      end
      object Label2: TLabel
        Left = 348
        Top = 64
        Width = 464
        Height = 16
        Caption = 
          'This property removes the special rows which cannot be handled b' +
          'y MS Word:'
      end
      object Memo1: TMemo
        Left = 11
        Top = 63
        Width = 324
        Height = 345
        Lines.Strings = (
          'The first Field'
          'The second Field'
          'Field 3'
          'Field 4'
          'Field 5'
          'Field 6'