object dlgCalculator: TdlgCalculator Left = 228 Top = 76 BorderStyle = bsDialog Caption = 'Cool Calculator' ClientHeight = 291 ClientWidth = 222 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] PixelsPerInch = 96 OnCreate = FormCreate TextHeight = 16 object lblResult: TLabel Left = 20 Top = 49 Width = 9 Height = 16 Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object shpLine: TShape Left = 13 Top = 216 Width = 192 Height = 1 Brush.Color = clGray end object lblEqualSign: TLabel Left = 8 Top = 48 Width = 9 Height = 16 Caption = '=' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object edtExpression: TEdit Left = 7 Top = 16 Width = 207 Height = 24 Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnKeyUp = edtExpressionKeyUp end object btn3: TButton Left = 115 Top = 71 Width = 39 Height = 28 Caption = '3' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 3 OnClick = btn1Click end object btn1: TButton Left = 13 Top = 71 Width = 39 Height = 28 Caption = '1' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = btn1Click end object btn4: TButton Left = 13 Top = 108 Width = 39 Height = 28 Caption = '4' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 4 OnClick = btn1Click end object btn7: TButton Left = 13 Top = 146 Width = 39 Height = 28 Caption = '7' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 7 OnClick = btn1Click end object btn2: TButton Left = 64 Top = 71 Width = 39 Height = 28 Caption = '2' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = btn1Click end object btn5: TButton Left = 64 Top = 109 Width = 39 Height = 28 Caption = '5' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 5 OnClick = btn1Click end object btn8: TButton Left = 64 Top = 146 Width = 39 Height = 28 Caption = '8' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 8 OnClick = btn1Click end object btn9: TButton Left = 115 Top = 146 Width = 39 Height = 28 Caption = '9' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 9 OnClick = btn1Click end object btn6: TButton Left = 115 Top = 109 Width = 39 Height = 28 Caption = '6' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 6 OnClick = btn1Click end object btn0: TButton Left = 13 Top = 182 Width = 39 Height = 28 Caption = '0' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 10 OnClick = btn1Click end object btnDecimal: TButton Left = 64 Top = 182 Width = 39 Height = 28 Caption = '.' Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 11 OnClick = btn1Click end object btnEquals: TButton Left = 115 Top = 182 Width = 39 Height = 28 Caption = '=' Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 16 OnClick = btnEqualsClick end object btnDivide: TButton Left = 166 Top = 71 Width = 39 Height = 28 Caption = '/' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 12 OnClick = btn1Click end object btnMultiply: TButton Left = 166 Top = 109 Width = 39 Height = 28 Caption = '*' Font.Color = clBlack Font.Height = -24 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 13 OnClick = btn1Click end object btnMinus: TButton Left = 166 Top = 146 Width = 39 Height = 28 Caption = '-' Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 14 OnClick = btn1Click end object btnPlus: TButton Left = 166 Top = 182 Width = 39 Height = 28 Caption = '+' Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 15 OnClick = btn1Click end object btnExampleA: TButton Left = 13 Top = 256 Width = 64 Height = 28 Caption = '&Example A' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 21 OnClick = btnExampleAClick end object btnClear: TButton Left = 13 Top = 222 Width = 46 Height = 28 Caption = '&Clear' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 17 OnClick = btnClearClick end object btnLeftBracket: TButton Left = 154 Top = 222 Width = 27 Height = 28 Caption = '(' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 19 OnClick = btn1Click end object btnRightBracket: TButton Left = 180 Top = 222 Width = 25 Height = 28 Caption = ')' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 20 OnClick = btn1Click end object btnBackSpace: TButton Left = 64 Top = 222 Width = 84 Height = 28 Caption = 'Backspace' TabOrder = 18 OnClick = btnBackSpaceClick end object btnEnter: TButton Left = 143 Top = 256 Width = 62 Height = 28 Caption = 'Enter' Default = True TabOrder = 23 OnClick = btnEqualsClick end object btnAbout: TButton Left = 82 Top = 256 Width = 56 Height = 28 Caption = '&About' TabOrder = 22 OnClick = btnAboutClick end end