expmain.dfm

编译原理源程序扫描

object frmMain: TfrmMain
  Left = 27
  Top = 24
  Width = 697
  Height = 497
  Caption = #32534#35793#21407#29702#23454#39564
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poDesktopCenter
  WindowState = wsMaximized
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Gauge1: TGauge
    Left = 0
    Top = 407
    Width = 689
    Height = 25
    Align = alBottom
    Progress = 0
    Visible = False
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 432
    Width = 689
    Height = 19
    Panels = <
      item
        Width = 50
      end>
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 689
    Height = 55
    ButtonHeight = 52
    ButtonWidth = 55
    Caption = 'ToolBar1'
    Images = ImageList1
    ShowCaptions = True
    TabOrder = 1
    object ToolButton1: TToolButton
      Left = 0
      Top = 2
      Caption = #26032#24314
      ImageIndex = 8
      OnClick = N2Click
    end
    object ToolButton3: TToolButton
      Left = 55
      Top = 2
      Caption = #25171#24320
      ImageIndex = 9
      OnClick = N3Click
    end
    object ToolButton4: TToolButton
      Left = 110
      Top = 2
      Caption = #20445#23384
      ImageIndex = 6
      OnClick = N4Click
    end
    object ToolButton5: TToolButton
      Left = 165
      Top = 2
      Width = 8
      Caption = 'ToolButton5'
      ImageIndex = 7
      Style = tbsDivider
    end
    object btnEdit: TToolButton
      Left = 173
      Top = 2
      Caption = #32534#36753
      ImageIndex = 4
      OnClick = btnEditClick
    end
    object ToolButton2: TToolButton
      Left = 228
      Top = 2
      Width = 8
      Caption = 'ToolButton2'
      ImageIndex = 4
      Style = tbsDivider
    end
    object btnOne: TToolButton
      Left = 236
      Top = 2
      Caption = #23454#39564#19968
      ImageIndex = 0
      OnClick = btnOneClick
    end
    object btnTwo: TToolButton
      Left = 291
      Top = 2
      Caption = #23454#39564#20108
      ImageIndex = 1
      OnClick = btnTwoClick
    end
    object btnThree: TToolButton
      Left = 346
      Top = 2
      Caption = '  '#23454#39564#19977'  '
      ImageIndex = 2
      OnClick = btnThreeClick
    end
    object ToolButton13: TToolButton
      Left = 401
      Top = 2
      Width = 8
      Caption = 'ToolButton13'
      ImageIndex = 11
      Style = tbsDivider
    end
    object btnExit: TToolButton
      Left = 409
      Top = 2
      Caption = #36864#20986
      ImageIndex = 3
      OnClick = N7Click
    end
  end
  object memText: TMemo
    Left = 0
    Top = 55
    Width = 689
    Height = 146
    Align = alTop
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlack
    Font.Height = -14
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
    ScrollBars = ssBoth
    TabOrder = 2
  end
  object panText: TPanel
    Left = 0
    Top = 264
    Width = 689
    Height = 143
    Align = alBottom
    BevelOuter = bvNone
    BorderStyle = bsSingle
    Color = clCaptionText
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    object memClass: TMemo
      Left = 528
      Top = 0
      Width = 157
      Height = 139
      Align = alRight
      BevelInner = bvNone
      BevelOuter = bvNone
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = 'Times New Roman'
      Font.Style = []
      Lines.Strings = (
        '')
      ParentFont = False
      ReadOnly = True
      ScrollBars = ssVertical
      TabOrder = 0
    end
  end
  object MainMenu1: TMainMenu
    Left = 632
    Top = 8
    object N1: TMenuItem
      Caption = #25991#20214
      object N2: TMenuItem
        Caption = #26032#24314
        OnClick = N2Click
      end
      object N3: TMenuItem
        Caption = #25171#24320'...'
        OnClick = N3Click
      end
      object N4: TMenuItem
        Caption = #20445#23384'...'
        OnClick = N4Click
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object N7: TMenuItem
        Caption = #36864#20986
        OnClick = N7Click
      end
    end
    object N8: TMenuItem
      Caption = #32534#36753
      object N9: TMenuItem
        Caption = #22797#21046
      end
      object N10: TMenuItem
        Caption = #21098#20999
      end
      object N11: TMenuItem
        Caption = #31896#36148
      end