superpr.dfm

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

            E6000000424DE60000000000000076000000280000000E0000000E0000000100
            0400000000007000000000000000000000001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
            FF00F00000FF00000F00F00000FF00000F00F00000FF00000F00F00000FF0000
            0F00F00000FF00000F00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00F00000FF0000
            0F00F00000FF00000F00F00000FF00000F00F00000FF00000F00F00000FF0000
            0F00FFFFFFFFFFFFFF00}
          OnClick = chkTileImageClick
        end
        object btnLoadImage: TButton
          Left = 9
          Top = 121
          Width = 64
          Height = 25
          Caption = 'Load...'
          TabOrder = 0
          OnClick = btnLoadImageClick
        end
        object grmMarginsBackground: TGroupBox
          Left = 130
          Top = 5
          Width = 163
          Height = 121
          Caption = 'Margins'
          TabOrder = 1
          object valBTopMargin: TWPValueEdit
            Left = 49
            Top = 17
            Width = 70
            Height = 26
            AvailableUnits = [euInch, euCm, euPt]
            UnitType = euTwips
            OnUnitChange = valPBottomMarginUnitChange
            TabOrder = 0
            OnChange = valColCountChange
            AllowNegative = False
            Value = 0
            IntValue = 0
            Undefined = False
          end
          object valBLeftMargin: TWPValueEdit
            Left = 9
            Top = 49
            Width = 70
            Height = 26
            AvailableUnits = [euInch, euCm, euPt]
            UnitType = euTwips
            OnUnitChange = valPBottomMarginUnitChange
            TabOrder = 1
            OnChange = valColCountChange
            AllowNegative = False
            Value = 0
            IntValue = 0
            Undefined = False
          end
          object valBRightMargin: TWPValueEdit
            Left = 82
            Top = 49
            Width = 71
            Height = 26
            AvailableUnits = [euInch, euCm, euPt]
            UnitType = euTwips
            OnUnitChange = valPBottomMarginUnitChange
            TabOrder = 2
            OnChange = valColCountChange
            AllowNegative = False
            Value = 0
            IntValue = 0
            Undefined = False
          end
          object valBBottomMargin: TWPValueEdit
            Left = 50
            Top = 82
            Width = 71
            Height = 26
            AvailableUnits = [euInch, euCm, euPt]
            UnitType = euTwips
            OnUnitChange = valPBottomMarginUnitChange
            TabOrder = 3
            OnChange = valColCountChange
            AllowNegative = False
            Value = 0
            IntValue = 0
            Undefined = False
          end
        end
        object chkTileImage: TCheckBox
          Left = 132
          Top = 130
          Width = 70
          Height = 16
          Caption = 'Tile'
          TabOrder = 2
          OnClick = chkTileImageClick
        end
        object grpPlacement: TGroupBox
          Left = 9
          Top = 153
          Width = 286
          Height = 54
          Caption = ' Placement '
          TabOrder = 3
          object ToolBar1: TToolBar
            Left = 2
            Top = 19
            Width = 282
            Height = 33
            Align = alBottom
            ButtonHeight = 28
            ButtonWidth = 29
            Caption = 'ToolBar1'
            EdgeBorders = []
            Flat = True
            Images = AlignImages
            TabOrder = 0
            object PL0: TToolButton
              Left = 0
              Top = 0
              Caption = 'PL0'
              Grouped = True
              ImageIndex = 0
              OnClick = PL0Click
            end
            object PL1: TToolButton
              Left = 29
              Top = 0
              Caption = 'PL1'
              Grouped = True
              ImageIndex = 1
              OnClick = PL0Click
            end
            object PL2: TToolButton
              Left = 58
              Top = 0
              Caption = 'PL2'
              Grouped = True
              ImageIndex = 2
              OnClick = PL0Click
            end
            object PL3: TToolButton
              Left = 87
              Top = 0
              Caption = 'PL3'
              Grouped = True
              ImageIndex = 3
              OnClick = PL0Click
            end
            object PL4: TToolButton
              Left = 116
              Top = 0
              Caption = 'PL4'
              Grouped = True
              ImageIndex = 4
              OnClick = PL0Click
            end
            object PL5: TToolButton
              Left = 145
              Top = 0
              Caption = 'PL5'
              Grouped = True
              ImageIndex = 5
              OnClick = PL0Click
            end
            object PL6: TToolButton
              Left = 174
              Top = 0
              Caption = 'PL6'
              Grouped = True
              ImageIndex = 6
              OnClick = PL0Click
            end
            object PL7: TToolButton
              Left = 203
              Top = 0
              Caption = 'PL7'
              Grouped = True
              ImageIndex = 7
              OnClick = PL0Click
            end
            object PL8: TToolButton
              Left = 232
              Top = 0
              Caption = 'PL8'
              Down = True
              Grouped = True
              ImageIndex = 8
              OnClick = PL0Click
            end
          end
        end
        object chkStretchImage: TCheckBox
          Left = 197
          Top = 130
          Width = 63
          Height = 18
          Caption = 'Stretch'
          Checked = True
          State = cbChecked
          TabOrder = 4
          OnClick = chkTileImageClick
        end
      end
    end
    object Panel3: TPanel
      Left = 2
      Top = 2
      Width = 311
      Height = 232
      Align = alClient
      BevelInner = bvLowered
      TabOrder = 1
      object PaintBox1: TPaintBox
        Left = 2
        Top = 2
        Width = 307
        Height = 228
        Align = alClient
        OnPaint = PaintBox1Paint
      end
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 41
    Width = 443
    Height = 486
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 1
    object WPRuler1: TWPRuler
      Left = 0
      Top = 0
      Width = 443
      Height = 26
      Units = wrInch
      DrawOptions = []
      TabKind = tkLeft
      Options = [wrShowTabSelector, wrShowTabStops, wrShowIndents, wpUseIntervalls]
      ColorMargin = clAppWorkSpace
      ColorBack = clBtnFace
      Align = alTop
    end
    object WPVertRuler1: TWPVertRuler
      Left = 0
      Top = 26
      Width = 26
      Height = 460
      Units = wrInch
      DrawOptions = []
      ColorMargin = clAppWorkSpace
      ColorBack = clBtnFace
      Align = alLeft
    end
    object WPRichText1: TWPRichText
      Left = 26
      Top = 26
      Width = 417
      Height = 460
      RTFText.Data = {
        7B5C727466315C616E73695C64656666305C7563315C616E7369637067313235
        325C6465667461623732307B5C666F6E7474626C7B5C66305C666E696C5C6663
        6861727365743020417269616C3B7D7B5C66315C666E696C5C66636861727365
        74302057696E6744696E67733B7D7D7B5C636F6C6F7274626C5C726564305C67
        7265656E305C626C7565303B5C7265643235355C677265656E305C626C756530
        3B5C726564305C677265656E3132385C626C7565303B5C726564305C67726565
        6E305C626C75653235353B5C7265643235355C677265656E3235355C626C7565
        303B5C7265643235355C677265656E305C626C75653235353B5C726564313238
        5C677265656E305C626C75653132383B5C7265643132385C677265656E305C62
        6C7565303B5C726564305C677265656E3235355C626C7565303B5C726564305C
        677265656E3235355C626C75653235353B5C726564305C677265656E3132385C
        626C75653132383B5C726564305C677265656E305C626C75653132383B5C7265
        643235355C677265656E3235355C626C75653235353B5C7265643139325C6772
        65656E3139325C626C75653139323B5C7265643132385C677265656E3132385C
        626C75653132383B5C726564305C677265656E305C626C7565303B7D5C706170
        65727731323234305C70617065726831353834305C6D6172676C3732305C6D61
        7267723732305C6D617267743732305C6D617267623732305C68656164657279
        3732305C666F6F746572793732305C656E646E686572655C7365637464656661
        756C74636C7B5C2A5C67656E657261746F72205750546F6F6C735F352E30382D
        50524D3B7D7B5C667331343420315C7061720D0A5C7061676520325C7061720D
        0A5C7061676520335C7061720D0A5C7061676520345C7061720D0A5C70616765
        20355C7061720D0A5C7061676520365C7061720D0A5C7061676520375C706172
        0D0A5C7061676520385C7061720D0A5C7061676520395C7061720D0A5C706167
        652031305C7061720D0A7D7D}
      Header.DefaultTopMargin = 720
      Header.DefaultBottomMargin = 720
      Header.DefaultLeftMargin = 720
      Header.DefaultRightMargin = 720
      Header.LeftMargin = 720
      Header.RightMargin = 720