www.pudn.com > kechengsheji.rar > Unit1.dfm

object Form1: TForm1 
  Left = 129 
  Top = 0 
  Width = 701 
  Height = 719 
  Align = alLeft 
  Caption = 'Form1' 
  Color = clBtnFace 
  Font.Charset = ANSI_CHARSET 
  Font.Color = clWindowText 
  Font.Height = -7 
  Font.Name = #23435#20307 
  Font.Style = [] 
  OldCreateOrder = False 
  PixelsPerInch = 96 
  TextHeight = 7 
  object Label1: TLabel 
    Left = 536 
    Top = 219 
    Width = 84 
    Height = 21 
    Caption = #28304#31243#24207#21517 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -21 
    Font.Name = #40657#20307 
    Font.Style = [] 
    ParentFont = False 
  end 
  object ButtonRun: TButton 
    Left = 574 
    Top = 421 
    Width = 73 
    Height = 27 
    Caption = 'RUN' 
    Font.Charset = ANSI_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -21 
    Font.Name = 'Times New Roman MT Extra Bold' 
    Font.Style = [fsBold] 
    ParentFont = False 
    TabOrder = 0 
    OnClick = ButtonRunClick 
  end 
  object Memo1: TMemo 
    Left = 9 
    Top = 5 
    Width = 512 
    Height = 668 
    Font.Charset = ANSI_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -21 
    Font.Name = 'Courier New' 
    Font.Style = [fsBold] 
    ImeName = #32043#20809#25340#38899#36755#20837#27861 
    Lines.Strings = ( 
      '***** PL/0 Compiler Demo *****') 
    ParentFont = False 
    ScrollBars = ssBoth 
    TabOrder = 1 
  end 
  object EditName: TEdit 
    Left = 536 
    Top = 241 
    Width = 85 
    Height = 31 
    Font.Charset = ANSI_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -21 
    Font.Name = 'Courier New' 
    Font.Style = [fsBold] 
    ImeName = #32043#20809#25340#38899#36755#20837#27861 
    ParentFont = False 
    TabOrder = 2 
  end 
  object ListSwitch: TRadioGroup 
    Left = 555 
    Top = 306 
    Width = 94 
    Height = 88 
    Caption = #30446#26631#20195#30721 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -21 
    Font.Name = #40657#20307 
    Font.Style = [] 
    ItemIndex = 0 
    Items.Strings = ( 
      #26174#31034 
      #19981#26174#31034) 
    ParentFont = False 
    TabOrder = 3 
  end 
end