www.pudn.com > PASSCAL高级计算器.rar > CalcUnit.dfm


object CalcForm: TCalcForm 
  Left = 105 
  Top = 84 
  Width = 575 
  Height = 427 
  Caption = #39640#32423#35745#31639#22120' '#65288#35201#33719#24471#24110#21161#35831#38190#20837'Help'#65289 
  Color = clBtnFace 
  Font.Charset = GB2312_CHARSET 
  Font.Color = clWindowText 
  Font.Height = -12 
  Font.Name = #23435#20307 
  Font.Style = [] 
  OldCreateOrder = False 
  Visible = True 
  OnClose = FormClose 
  OnShow = FormShow 
  PixelsPerInch = 96 
  TextHeight = 12 
  object Panel1: TPanel 
    Left = 15 
    Top = 0 
    Width = 552 
    Height = 400 
    Align = alClient 
    BevelOuter = bvNone 
    Color = clBlack 
    TabOrder = 0 
    object Memo1: TMemo 
      Left = 0 
      Top = 0 
      Width = 552 
      Height = 400 
      Align = alClient 
      BevelInner = bvNone 
      BevelOuter = bvNone 
      BorderStyle = bsNone 
      Color = clBlack 
      Ctl3D = False 
      Font.Charset = ANSI_CHARSET 
      Font.Color = clWhite 
      Font.Height = -16 
      Font.Name = 'Courier New' 
      Font.Style = [] 
      ParentCtl3D = False 
      ParentFont = False 
      TabOrder = 0 
      OnKeyDown = Memo1KeyDown 
      OnKeyPress = Memo1KeyPress 
      OnKeyUp = Memo1KeyUp 
      OnMouseMove = Memo1MouseMove 
    end 
  end 
  object Panel2: TPanel 
    Left = 0 
    Top = 0 
    Width = 15 
    Height = 400 
    Align = alLeft 
    BevelOuter = bvNone 
    Color = clBlack 
    TabOrder = 1 
  end 
  object FontDialog1: TFontDialog 
    Font.Charset = DEFAULT_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -11 
    Font.Name = 'MS Sans Serif' 
    Font.Style = [] 
    MinFontSize = 0 
    MaxFontSize = 0 
    Left = 64 
    Top = 72 
  end 
  object ColorDialog1: TColorDialog 
    Ctl3D = True 
    Left = 56 
    Top = 16 
  end 
  object Timer1: TTimer 
    Interval = 2000 
    OnTimer = Timer1Timer 
    Left = 112 
    Top = 16 
  end 
end