wpmdiu1.dfm

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

object WPMdiDemo: TWPMdiDemo
  Left = 23
  Top = 157
  Width = 777
  Height = 355
  Caption = 'WPMdiDemo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIForm
  Menu = WPDefAct.MainMenu
  OldCreateOrder = False
  OnCreate = FormCreate
  OnPaint = FormPaint
  PixelsPerInch = 120
  TextHeight = 16
  object ControlBar1: TControlBar
    Left = 0
    Top = 0
    Width = 769
    Height = 30
    Align = alTop
    TabOrder = 0
    object WPComboBox1: TWPComboBox
      Left = 11
      Top = 2
      Width = 145
      Height = 22
      Style = csOwnerDrawFixed
      ItemHeight = 16
      TabOrder = 0
      Items.Strings = (
        'Albertus Extra Bold'
        'Albertus Medium'
        'Antique Olive'
        'Arial'
        'Arial CE'
        'Arial CYR'
        'Arial Greek'
        'Arial TUR'
        'Arial Baltic'
        'CG Omega'
        'CG Times'
        'Clarendon Condensed'
        'Coronet'
        'Courier'
        'Garamond'
        'Letter Gothic'
        'Marigold'
        'Symbol'
        'Times New Roman'
        'Times New Roman CE'
        'Times New Roman CYR'
        'Times New Roman Greek'
        'Times New Roman TUR'
        'Times New Roman Baltic'
        'Univers'
        'Univers Condensed'
        'Wingdings'
        'CourierPS'
        'Helvetica'
        'Helvetica Narrow'
        'ITC Avant Garde Gothic'
        'ITC Bookman'
        'ITC Zapf Dingbats'
        'New Century Schoolbook'
        'Palatino'
        'SymbolPS'
        'Times'
        'ITC Zapf Chancery'
        'PRESCRIBE'
        'Marlett'
        'Arial'
        'Arial CE'
        'Arial CYR'
        'Arial Greek'
        'Arial TUR'
        'Arial Baltic'
        'Arial Italic'
        'Arial CE'
        'Arial CYR'
        'Arial Greek'
        'Arial TUR'
        'Arial Baltic'
        'Arial Bold'
        'Arial CE'
        'Arial CYR'
        'Arial Greek'
        'Arial TUR'
        'Arial Baltic'
        'Arial Bold Italic'
        'Arial CE'
        'Arial CYR'
        'Arial Greek'
        'Arial TUR'
        'Arial Baltic'
        'Courier New'
        'Courier New CE'
        'Courier New CYR'
        'Courier New Greek'
        'Courier New TUR'
        'Courier New Baltic'
        'Lucida Console'
        'Lucida Sans Unicode'
        'Times New Roman'
        'Times New Roman CE'
        'Times New Roman CYR'
        'Times New Roman Greek'
        'Times New Roman TUR'
        'Times New Roman Baltic'
        'Times New Roman Italic'
        'Times New Roman CE'
        'Times New Roman CYR'
        'Times New Roman Greek'
        'Times New Roman TUR'
        'Times New Roman Baltic'
        'Times New Roman Bold'
        'Times New Roman CE'
        'Times New Roman CYR'
        'Times New Roman Greek'
        'Times New Roman TUR'
        'Times New Roman Baltic'
        'Times New Roman Bold Italic'
        'Times New Roman CE'
        'Times New Roman CYR'
        'Times New Roman Greek'
        'Times New Roman TUR'
        'Times New Roman Baltic'
        'Wingdings'
        'Symbol'
        'Verdana'
        'Arial Black'
        'Comic Sans MS'
        'Impact'
        'Georgia'
        'Franklin Gothic Medium'
        'Palatino Linotype'
        'Tahoma'
        'Trebuchet MS'
        'Webdings'
        'Estrangelo Edessa'
        'Gautami'
        'Latha'
        'Mangal'
        'MV Boli'
        'Raavi'
        'Shruti'
        'Tunga'
        'Sylfaen'
        'Microsoft Sans Serif'
        'Courier'
        'WP Greek Century'
        'WP MultinationalA Courier'
        'WP MultinationalB Courier'
        'WP BoxDrawing'
        'WP Greek Courier'
        'WP Hebrew David'
        'WP MultinationalA Helve'
        'WP MultinationalB Helve'
        'WP Phonetic'
        'WP TypographicSymbols'
        'WP IconicSymbolsA'
        'WP IconicSymbolsB'
        'WP MathA'
        'WP MathB'
        'WP MathExtendedA'
        'WP MathExtendedB'
        'WP Greek Helve'
        'WP Japanese'
        'WP MultinationalA Roman'
        'WP MultinationalB Roman'
        'WP CyrillicA'
        'WP CyrillicB'
        'WP Arabic Sihafa'
        'WP ArabicScript Sihafa'
        'AvantGarde Bk BT'
        'AvantGarde Md BT'
        'English111 Vivace BT'
        'Humanst521 BT'
        'Humanst521 BT Bold'
        'Humanst521 BT Italic'
        'Humanst521 BT Roman'
        'Dauphin'
        'Zurich Ex BT'
        'Allegro BT'
        'BankGothic Md BT'
        'BernhardFashion BT'
        'BernhardMod BT'
        'Swiss911 XCm BT'
        'Souvenir Lt BT'
        'Bremen Bd BT'
        'CopprplGoth Bd BT'
        'Futura Md BT'
        'Futura Lt BT'
        'LithographLight'
        'Lithograph'
        'Kabel Ult BT'
        'Kabel Bk BT'
        'GoudyHandtooled BT'
        'GoudyOlSt BT'
        'OzHandicraft BT'
        'Futura XBlk BT'
        'PosterBodoni BT'
        'Serifa BT'
        'FuturaBlack BT'
        'Serifa Th BT'
        'CommonBullets'
        'Charlesworth'
        'Staccato222 BT'
        'Staccato 222 BT'
        'TypoUpright BT'
        'ZapfEllipt BT'
        'Benguiat Bk BT'
        'Toledo'
        'ToledoLH'
        'Seagull'
        'MicroSquare'
        'Glasgow'
        'GlasgowLH'
        'OCR-A'
        'QuickType'
        'QuickType Pi'
        'QuickType Condensed'
        'QuickType Mono'
        'Arial Narrow'
        'Book Antiqua'
        'Bookman Old Style'
        'Century Gothic'
        'Garamond'
        'Garamond Antiqua'
        'Garamond Kursiv'
        'Garamond Halbfett'
        'Wingdings 2'
        'Wingdings 3'
        'MT Extra'
        'sshlinedraw'
        'AgentDB'
        'AgentMedDB'
        'BrittaDB'
        'ArthurBecker'
        'JeffBecker'
        'GarondDB'
        'GarondCapsDB'
        'GillionDB'
        'HelbaConDB'
        'Balloon Bd BT'
        'Balloon Lt BT'
        'Balloon XBd BT'
        'Bauhaus Hv BT'
        'Bauhaus Lt BT'
        'Bauhaus Md BT'
        'Futura Bk BT'
        'Futura Hv BT'
        'GeoSlab703 Lt BT'
        'GeoSlab703 Md BT'
        'GeoSlab703 XBd BT'
        'GeoSlb712 Lt BT'
        'GeoSlb712 Md BT'
        'GeoSlb712 XBd BT'
        'Kaufmann Bd BT'
        'Kaufmann BT'
        'AngsanaUPC'
        'Angsana New'
        'BrowalliaUPC'
        'Browallia New'
        'CordiaUPC'
        'Cordia New'
        'DilleniaUPC'
        'EucrosiaUPC'
        'FreesiaUPC'
        'IrisUPC'
        'JasmineUPC'
        'KodchiangUPC'
        'LilyUPC'
        'Aharoni'
        'David'
        'David Transparent'
        'FrankRuehl'
        'Levenim MT'
        'Miriam'
        'Miriam Transparent'
        'Miriam Fixed'
        'Fixed Miriam Transparent'
        'Narkisim'
        'Rod'
        'Rod Transparent'
        'Traditional Arabic'
        'Arabic Transparent'
        'Andalus'
        'Simplified Arabic'
        'Simplified Arabic Fixed'
        'John Handy LET'
        'Academy Engraved LET'
        'University Roman LET'
        'Milano LET'
        'Smudger LET'
        'Ruach LET'
        'La Bamba LET'
        'Quixley LET'
        'One Stroke Script LET'
        'Odessa LET'
        'Scruff LET'
        'ParkAvenue BT'
        'Cataneo BT'
        'Blackletter686 BT'
        'Calligraph421 BT'
        'MisterEarl BT'
        'OldDreadfulNo7 BT'
        'HolidayPi BT'
        'Jokerman LET'
        'Orange LET'
        'Victorian LET'
        'Westwood LET'
        'Rage Italic LET'
        'Tiranti Solid LET'
        'Mekanik LET'
        'Highlight LET'
        'Broadway BT'
        'Square721 BT'
        'Pump Demi Bold LET'
        'Alba'
        'Alba Matter'
        'Alba Super'
        'Baby Kruffy'
        'Chick'
        'Croobie'
        'Fat'
        'Freshbot'
        'Frosty'
        'GlooGun'
        'Jenkins v2.0'
        'Jenkins v2.0   Thik'
        'Jokewood'
        'Porky'#39's'
        'Pussycat'
        'Pussycat  Sassy'
        'Weltron Urban'
        'Poornut'
        'Arial_plus_IVD_Symbols'
        'MS Gothic'
        '@MS Gothic'
        'MS PGothic'
        '@MS PGothic'
        'MS UI Gothic'
        '@MS UI Gothic'
        'Albertus Extra Bold'
        'Antique Olive'
        'Clarendon Condensed'
        'Coronet'
        'Letter Gothic'
        'Marigold'
        'CG Omega'
        'CG Times'
        'Univers'
        'Univers Condensed'
        'SymbolPS'
        'Albertus Medium'
        'ITC Zapf Dingbats'
        'ITC Avant Garde Gothic'
        'ITC Bookman'
        'CourierPS'
        'Helvetica'
        'Helvetica Narrow'
        'New Century Schoolbook'
        'Palatino'
        'Times'
        'ITC Zapf Chancery'
        'Roman'
        'Script'
        'Modern')
      ComboBoxStyle = cbsPrinterFonts
      DontApplyChanges = False
    end
    object WPComboBox2: TWPComboBox
      Left = 169
      Top = 2
      Width = 76
      Height = 22
      Style = csOwnerDrawFixed
      ItemHeight = 16
      TabOrder = 1
      Items.Strings = (
        ' 6'
        ' 7'
        ' 8'
        ' 9'
        ' 10'
        ' 11'
        ' 12'
        ' 13'
        ' 14'
        ' 15'
        ' 16'
        ' 17'
        ' 18'
        ' 19'
        ' 20'
        ' 21'
        ' 22'
        ' 23'
        ' 24'
        ' 25'
        ' 26'
        ' 27'
        ' 28'
        ' 29'
        ' 30'
        ' 31'
        ' 32'
        ' 33'
        ' 34'
        ' 35'
        ' 36'
        ' 37'
        ' 38'
        ' 39'
        ' 40'
        ' 41'
        ' 42'
        ' 43'
        ' 44'
        ' 45'
        ' 46'
        ' 47'
        ' 48'
        ' 49'
        ' 50'
        ' 51'
        ' 52'
        ' 53'
        ' 54'
        ' 55'
        ' 56'
        ' 57'
        ' 58'
        ' 59'
        ' 60'
        ' 61'
        ' 62'
        ' 63'
        ' 64'
        ' 65'
        ' 66'
        ' 67'
        ' 68'
        ' 69'
        ' 70'
        ' 71'
        ' 72')
      ComboBoxStyle = cbsFontSize
      DontApplyChanges = False
    end
    object ToolBar1: TToolBar
      Left = 258
      Top = 2
      Width = 74
      Height = 48
      Caption = 'ToolBar1'
      EdgeBorders = []
      TabOrder = 2
      object ToolButton1: TToolButton
        Left = 0
        Top = 2
        Caption = 'ToolButton1'
        ImageIndex = 0
      end
      object ToolButton2: TToolButton
        Left = 23
        Top = 2
        Caption = 'ToolButton2'
        ImageIndex = 1
      end
      object ToolButton3: TToolButton
        Left = 46
        Top = 2
        Caption = 'ToolButton3'
        ImageIndex = 2
      end
    end
  end
  object WPDefaultActions1: TWPDefaultActions
    ControlledMemos = <>
    AssignMenu = True
    OnInit = WPDefaultActions1Init
    OnClose = WPDefaultActions1Close
    OnNew = WPDefaultActions1New
    OnLoad = WPDefaultActions1Load
    Left = 101
    Top = 73
  end
end