unit1.dfm

用ＢＣＢ做的pascal词法分析器

object Form1: TForm1
  Left = 214
  Top = 132
  Anchors = []
  AutoScroll = False
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'Pascal'#35821#35328#35789#27861#20998#26512#22120
  ClientHeight = 398
  ClientWidth = 481
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 465
    Height = 345
    Caption = 'Pascal'#35821#35328#35789#27861#20998#26512#22120
    TabOrder = 0
    object Label1: TLabel
      Left = 336
      Top = 16
      Width = 60
      Height = 13
      Caption = #20998#26512#32467#26524'    '
    end
    object PageControl1: TPageControl
      Left = 6
      Top = 16
      Width = 295
      Height = 325
      ActivePage = TabSheet3
      TabIndex = 2
      TabOrder = 0
      object TabSheet1: TTabSheet
        Caption = 'Pascal'#28304#20195#30721
        object Memo1: TMemo
          Left = 0
          Top = 0
          Width = 281
          Height = 297
          Lines.Strings = (
            'Memo1')
          TabOrder = 0
        end
      end
      object TabSheet2: TTabSheet
        Caption = #20108#20803#24335#24207#21015
        ImageIndex = 1
        object StringGrid1: TStringGrid
          Left = 0
          Top = 0
          Width = 281
          Height = 297
          ColCount = 3
          FixedCols = 0
          RowCount = 200
          TabOrder = 0
          ColWidths = (
            69
            70
            67)
        end
      end
      object TabSheet3: TTabSheet
        Caption = #26631#35782#31526#34920
        ImageIndex = 2
        object StringGrid2: TStringGrid
          Left = 0
          Top = 0
          Width = 281
          Height = 297
          ColCount = 2
          FixedCols = 0
          RowCount = 50
          TabOrder = 0
          ColWidths = (
            80
            101)
        end
      end
    end
    object ListBox1: TListBox
      Left = 306
      Top = 40
      Width = 153
      Height = 297
      ItemHeight = 13
      TabOrder = 1
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 352
    Width = 465
    Height = 41
    Caption = #25805#20316
    TabOrder = 1
    object Button1: TButton
      Left = 32
      Top = 10
      Width = 73
      Height = 25
      Caption = #25171#24320
      TabOrder = 0
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 144
      Top = 10
      Width = 75
      Height = 25
      Caption = #35789#27861#20998#26512
      TabOrder = 1
      OnClick = Button2Click
    end
    object Button3: TButton
      Left = 250
      Top = 10
      Width = 75
      Height = 25
      Caption = #35821#27861#20998#26512
      TabOrder = 2
    end
    object Button4: TButton
      Left = 360
      Top = 10
      Width = 75
      Height = 25
      Caption = #36864#20986
      TabOrder = 3
      OnClick = Button4Click
    end
  end
  object OpenDialog1: TOpenDialog
    Left = 64
    Top = 88
  end
end