📄 mailmun1.dfm

📁 wptools5 pro 完整源代码 Msword界面的文本编辑器源代码
💻 DFM
📖 第 1 页 / 共 2 页
字号:
上一页 12
          AutomaticTextAttr.UseHotBackgroundColor = True
          AutomaticTextAttr.HotEffect = wpeffOutline
          AutomaticTextAttr.HotStyleIsActive = True
          AutomaticTextAttr.OnHintEventIsActive = True
          AutomaticTextAttr.HotEffectColor = clYellow
          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
          ClickableCodes = [wpobjMergeField]
          OneClickHyperlink = False
          HyperLinkEvent = WPRichText1HyperLinkEvent
          OnActivatingHotStyle = WPRichText1ActivatingHotStyle
          OnDeactivateHotStyle = WPRichText1DeactivateHotStyle
          Align = alClient
          ParentColor = False
          TabOrder = 0
        end
        object WPToolBar1: TWPToolBar
          Left = 0
          Top = 0
          Width = 558
          Height = 86
          ParentColor = False
          UseDockManager = False
          KeepGroupsTogether = True
          Align = alTop
          BevelLines = [wplBottom]
          AutoEnabling = True
          BevelOuter = bvNone
          WidthBetweenGroups = 4
          FontChoice = fsPrinterFonts
          sel_ListBoxes = [SelFontName, SelFontSize, SelFontColor, SelParColor]
          sel_StatusIcons = [SelBold, SelItalic, SelUnder, SelLeft, SelRight, SelBlock, SelCenter]
          sel_ActionIcons = [SelOpen, SelSave]
          sel_DatabaseIcons = []
          sel_EditIcons = [SelUndo, SelRedo, SelCopy, SelCut, SelPaste, SelFind, SelReplace]
          sel_TableIcons = [SelCreateTable, SelSplitCell, SelCombineCell, SelBAllOff, SelBAllOn, SelBInner, SelBOuter, SelBLeft, SelBRight, SelBTop, SelBBottom]
          sel_OutlineIcons = [SelNumbers]
          FontSizeFrom = 8
          FlatButtons = True
          ButtonHeight = 0
          TrueTypeOnly = False
          object Button2: TButton
            Left = 5
            Top = 57
            Width = 136
            Height = 25
            Caption = 'Replace Tokens <>'
            TabOrder = 0
            OnClick = Button2Click
          end
          object Button3: TButton
            Left = 143
            Top = 57
            Width = 103
            Height = 25
            Caption = 'Create Hyperlink'
            TabOrder = 5
            OnClick = Button3Click
          end
        end
        object WPRuler1: TWPRuler
          Left = 0
          Top = 86
          Width = 558
          Height = 26
          Units = wrCentimeter
          DrawOptions = []
          TabKind = tkLeft
          Options = [wrShowTabSelector, wrShowTabStops, wrShowIndents, wpUseIntervalls, wpNoVertRulerAttached]
          ColorMargin = clAppWorkSpace
          ColorBack = clBtnFace
          ColorTableMarker = clBtnShadow
          Align = alTop
        end
        object WPVertRuler1: TWPVertRuler
          Left = 0
          Top = 112
          Width = 26
          Height = 375
          Units = wrCentimeter
          DrawOptions = []
          ColorMargin = clAppWorkSpace
          ColorBack = clBtnFace
          Align = alLeft
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = 'Many Letters'
      object Panel4: TPanel
        Left = 0
        Top = 433
        Width = 774
        Height = 54
        Align = alBottom
        TabOrder = 0
        object Label1: TLabel
          Left = 638
          Top = 19
          Width = 3
          Height = 16
        end
        object Button1: TButton
          Left = 15
          Top = 14
          Width = 237
          Height = 30
          Caption = 'Merge all records'
          TabOrder = 0
          OnClick = Button1Click
        end
        object ProgressBar1: TProgressBar
          Left = 263
          Top = 18
          Width = 363
          Height = 20
          TabOrder = 1
        end
        object Dummy: TCheckBox
          Left = 637
          Top = 18
          Width = 204
          Height = 17
          Caption = 'Dummy - Merge 500 times'
          TabOrder = 2
          OnClick = DummyClick
        end
      end
      object AllRTFText: TWPRichText
        Left = 0
        Top = 0
        Width = 774
        Height = 433
        Cursor = crIBeam
        Header.DefaultTabstop = 254
        RTFVariables = <>
        SpellCheckStrategie = wpspCheckInInit
        XOffset = 144
        YOffset = 141
        XBetween = 144
        YBetween = 144
        Zooming = 79
        LayoutMode = wplayFullLayout
        ScrollBars = ssVertical
        EditOptions = [wpTableResizing, wpTableColumnResizing, wpObjectMoving, wpObjectResizingWidth, wpObjectResizingHeight, wpObjectResizingKeepRatio, wpObjectSelecting, wpObjectDeletion, wpSpreadsheetCursorMovement, wpActivateUndo, wpActivateUndoHotkey, wpMoveCPOnPageUpDown]
        ClipboardOptions = []
        ProtectedProp = []
        BorderStyle = bsSingle
        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
        ParentColor = False
        TabOrder = 1
      end
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 77
    Top = 104
  end
  object Table1: TTable
    Left = 109
    Top = 104
  end
  object OpenDialog1: TOpenDialog
    Filter = 'Database files|*.DB;*.DBF'
    Left = 192
    Top = 105
  end
  object WPMMDataProvider1: TWPMMDataProvider
    Datasource = DataSource1
    EditBox = WPRichText1
    ShowFieldNames = False
    Options = [wpmmPreserveObjectSize]
    AutoLoadData = True
    AppendSpaceToNonEmpty = False
    AutoSaveData = False
    Left = 77
    Top = 136
  end
  object WPDefaultActions1: TWPDefaultActions
    ControlledMemos = <
      item
        EditBox = WPRichText1
        Tag = 0
      end>
    AssignMenu = False
    Left = 102
    Top = 214
  end
end
上一页 12
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -