unit1.dfm

著名的Handle

object Form1: TForm1
  Left = 241
  Top = 129
  Width = 665
  Height = 476
  Caption = 'Form1'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object mwCustomEdit1: TmwCustomEdit
    Left = 0
    Top = 0
    Width = 657
    Height = 408
    Cursor = crIBeam
    Align = alClient
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Courier New'
    Font.Style = []
    GutterColor = clBtnFace
    GutterWidth = 30
    HighLighter = mwPasSyn1
    LeftChar = 1
    Lines.Strings = (
      'mwCustomEdit1')
    LineText = 'mwCustomEdit1'
    MaxUndo = 10
    ParentColor = False
    ParentFont = False
    ReadOnly = False
    TabOrder = 0
    TopLine = 1
    OnChange = mwCustomEdit1Change
    OnEnter = mwCustomEdit1Enter
    OnKeyUp = mwCustomEdit1KeyUp
  end
  object Panel1: TPanel
    Left = 0
    Top = 408
    Width = 657
    Height = 41
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 14
      Width = 63
      Height = 13
      Caption = 'Use Settings:'
    end
    object lblLanguage: TLabel
      Left = 304
      Top = 14
      Width = 51
      Height = 13
      Caption = 'Language:'
    end
    object Label2: TLabel
      Left = 216
      Top = 16
      Width = 3
      Height = 13
    end
    object cmdOpen: TButton
      Left = 480
      Top = 8
      Width = 75
      Height = 25
      Caption = '&Load'
      TabOrder = 0
      OnClick = cmdOpenClick
    end
    object cmdUndo: TButton
      Left = 568
      Top = 8
      Width = 75
      Height = 25
      Caption = '&Undo'
      TabOrder = 1
      OnClick = cmdUndoClick
    end
    object cboHighlight: TComboBox
      Left = 74
      Top = 11
      Width = 127
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 2
      OnChange = cboHighlightChange
    end
    object cboLanguage: TComboBox
      Left = 360
      Top = 10
      Width = 105
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      Items.Strings = (
        'Pascal'
        'C++'
        'Perl')
      TabOrder = 3
      OnChange = cboLanguageChange
    end
  end
  object dlgOpen: TOpenDialog
    FileEditStyle = fsEdit
    Filter = 
      'Pascal files (*.pas,*.inc)|*.pas;*.inc|C++ files (*.c,*.cpp,*.h,' +
      '*.hpp)|*.c;*.cpp;*.h;*.hpp|Perl files (*.pl,*.pm,*.cgi)|*.pl;*.p' +
      'm;*.cgi|All files (*.*)|*.*'
    Left = 152
    Top = 216
  end
  object mwPasSyn1: TmwPasSyn
    AsmAttri.Background = clWindow
    AsmAttri.Foreground = clWindowText
    AsmAttri.Style = []
    CommentAttri.Background = clWindow
    CommentAttri.Foreground = clWindowText
    CommentAttri.Style = [fsItalic]
    IdentifierAttri.Background = clWindow
    IdentifierAttri.Foreground = clWindowText
    IdentifierAttri.Style = []
    KeyAttri.Background = clWindow
    KeyAttri.Foreground = clWindowText
    KeyAttri.Style = [fsBold]
    NumberAttri.Background = clWindow
    NumberAttri.Foreground = clWindowText
    NumberAttri.Style = []
    SpaceAttri.Background = clWindow
    SpaceAttri.Foreground = clWindowText
    SpaceAttri.Style = []
    StringAttri.Background = clWindow
    StringAttri.Foreground = clWindowText
    StringAttri.Style = []
    SymbolAttri.Background = clWindow
    SymbolAttri.Foreground = clWindowText
    SymbolAttri.Style = []
    Left = 192
    Top = 216
  end
  object DcjCppSyn1: TDcjCppSyn
    AsmAttri.Background = clSilver
    AsmAttri.Foreground = clWindowText
    AsmAttri.Style = []
    CommentAttri.Background = clWindow
    CommentAttri.Foreground = clNavy
    CommentAttri.Style = [fsItalic]
    IdentifierAttri.Background = clWindow
    IdentifierAttri.Foreground = clWindowText
    IdentifierAttri.Style = []
    KeyAttri.Background = clWindow
    KeyAttri.Foreground = clWindowText
    KeyAttri.Style = [fsBold]
    NumberAttri.Background = clWindow
    NumberAttri.Foreground = clWindowText
    NumberAttri.Style = []
    SpaceAttri.Background = clWindow
    SpaceAttri.Foreground = clWindowText
    SpaceAttri.Style = []
    StringAttri.Background = clWindow
    StringAttri.Foreground = clFuchsia
    StringAttri.Style = []
    SymbolAttri.Background = clWindow
    SymbolAttri.Foreground = clWindowText
    SymbolAttri.Style = []
    DirecAttri.Background = clWindow
    DirecAttri.Foreground = clGreen
    DirecAttri.Style = []
    Left = 232
    Top = 216
  end
  object DcjPerlSyn1: TDcjPerlSyn
    CommentAttri.Background = clWindow
    CommentAttri.Foreground = clNavy
    CommentAttri.Style = [fsItalic]
    IdentifierAttri.Background = clWindow
    IdentifierAttri.Foreground = clWindowText
    IdentifierAttri.Style = []
    KeyAttri.Background = clWindow
    KeyAttri.Foreground = clWindowText
    KeyAttri.Style = [fsBold]
    NumberAttri.Background = clWindow
    NumberAttri.Foreground = clRed
    NumberAttri.Style = []
    OperatorAttri.Background = clWindow
    OperatorAttri.Foreground = clWindowText
    OperatorAttri.Style = []
    PragmaAttri.Background = clWindow
    PragmaAttri.Foreground = clGreen
    PragmaAttri.Style = [fsBold]
    SpaceAttri.Background = clWindow
    SpaceAttri.Foreground = clWindow
    SpaceAttri.Style = []
    StringAttri.Background = clWindow
    StringAttri.Foreground = clFuchsia
    StringAttri.Style = []
    SymbolAttri.Background = clWindow
    SymbolAttri.Foreground = clWindowText
    SymbolAttri.Style = []
    VariableAttri.Background = clWindow
    VariableAttri.Foreground = clWindowText
    VariableAttri.Style = [fsBold]
    Left = 272
    Top = 216
  end
end