object Form: TCalculator
Menu = VBmainmenu
  Caption         =   'Calculator'
  Font.Name = 'System'
  Font.Height = -14
  Height = 226
  Left = 205
  Top = 111
  Width = 224
  OnCreate = Form_Load

 object NumberIndeX7: TButton
 Caption         =   '7'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 8
 TabOrder = 7
 Top = 40
 Width = 32
 OnClick = Number_Click
 end

 object NumberIndeX8: TButton
 Caption         =   '8'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 48
 TabOrder = 8
 Top = 40
 Width = 32
 OnClick = Number_Click
 end

 object NumberIndeX9: TButton
 Caption         =   '9'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 88
 TabOrder = 9
 Top = 40
 Width = 32
 OnClick = Number_Click
 end

 object Cancel: TButton
 Caption         =   'C'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 136
 TabOrder = 10
 Top = 40
 Width = 32
 OnClick = Cancel_Click
 end

 object CancelEntry: TButton
 Caption         =   'CE'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 176
 TabOrder = 11
 Top = 40
 Width = 32
 OnClick = CancelEntry_Click
 end

 object NumberIndeX4: TButton
 Caption         =   '4'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 8
 TabOrder = 4
 Top = 80
 Width = 32
 OnClick = Number_Click
 end

 object NumberIndeX5: TButton
 Caption         =   '5'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 48
 TabOrder = 5
 Top = 80
 Width = 32
 OnClick = Number_Click
 end

 object NumberIndeX6: TButton
 Caption         =   '6'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 88
 TabOrder = 6
 Top = 80
 Width = 32
 OnClick = Number_Click
 end

 object OperatorIndeX1: TButton
 Caption         =   '+'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 136
 TabOrder = 12
 Top = 80
 Width = 32
 OnClick = Operator_Click
 end

 object OperatorIndeX3: TButton
 Caption         =   '-'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 176
 TabOrder = 13
 Top = 80
 Width = 32
 OnClick = Operator_Click
 end

 object NumberIndeX1: TButton
 Caption         =   '1'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 8
 TabOrder = 1
 Top = 120
 Width = 32
 OnClick = Number_Click
 end

 object NumberIndeX2: TButton
 Caption         =   '2'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 48
 TabOrder = 2
 Top = 120
 Width = 32
 OnClick = Number_Click
 end

 object NumberIndeX3: TButton
 Caption         =   '3'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 88
 TabOrder = 3
 Top = 120
 Width = 32
 OnClick = Number_Click
 end

 object OperatorIndeX2: TButton
 Caption         =   'X'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 136
 TabOrder = 14
 Top = 120
 Width = 32
 OnClick = Operator_Click
 end

 object OperatorIndeX0: TButton
 Caption         =   '/'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 176
 TabOrder = 15
 Top = 120
 Width = 32
 OnClick = Operator_Click
 end

 object NumberIndeX0: TButton
 Caption         =   '0'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 8
 TabOrder = 0
 Top = 160
 Width = 72
 OnClick = Number_Click
 end

 object Decimal: TButton
 Caption         =   '.'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 88
 TabOrder = 18
 Top = 160
 Width = 32
 OnClick = Decimal_Click
 end

 object OperatorIndeX4: TButton
 Caption         =   '='
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 136
 TabOrder = 16
 Top = 160
 Width = 32
 OnClick = Operator_Click
 end

 object Percent: TButton
 Caption         =   '%'
 Font.Name = 'System'
 Font.Height = -14
 Height = 32
 Left = 176
 TabOrder = 17
 Top = 160
 Width = 32
 OnClick = Percent_Click
 end

 object Readout: TLabel
 Color = $0000FFFF
 Caption         =   '0.'
 Font.Name = 'MS Sans Serif'
 Font.Height = -20
 Font.Color = $00000000
 Height = 25
 Left = 8
 Top = 7
 Width = 200
 end
end
