object CalcF: TCalcF Left = 897 Top = 344 HelpContext = 150 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'Vinny RPN Calculator' ClientHeight = 319 ClientWidth = 519 Font.Color = clBlack Font.Height = -17 Font.Name = 'Times New Roman Special G1' Font.Style = [] FormStyle = fsStayOnTop Icon.Data = {} OnActivate = FormActivate OnClose = FormClose OnShow = FormShow PixelsPerInch = 120 TextHeight = 26 object SpeedButtonP: TSpeedButton Left = 63 Top = 184 Width = 36 Height = 36 Hint = 'X = Y + X' Font.Color = clBlack Font.Height = -27 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] Glyph.Data = { E6000000424DE6000000000000007600000028000000100000000E0000000100 0400000000007000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFF FFFFFFFFFFF00FFFFFFFFFF0000000000FFFFFF0000000000FFFFFFFFFF00FFF FFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFF} ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButtonPClick end object SpeedButtonM: TSpeedButton Left = 115 Top = 184 Width = 36 Height = 36 Hint = 'X = Y - X' Font.Color = clBlack Font.Height = -33 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] Glyph.Data = { E6000000424DE6000000000000007600000028000000100000000E0000000100 0400000000007000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFF0000000000FFFFFF0000000000FFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFF} ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButtonMClick end object Label1: TLabel Left = 7 Top = 139 Width = 30 Height = 32 Alignment = taCenter AutoSize = False Caption = 'X' Font.Color = clBlack Font.Height = -23 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 7 Top = 96 Width = 30 Height = 32 Alignment = taCenter AutoSize = False Caption = 'Y' Font.Color = clBlack Font.Height = -23 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 7 Top = 56 Width = 30 Height = 32 Alignment = taCenter AutoSize = False Caption = 'Z' Font.Color = clBlack Font.Height = -23 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 7 Top = 13 Width = 30 Height = 32 Alignment = taCenter AutoSize = False Caption = 'T' Font.Color = clBlack Font.Height = -23 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False end object SpeedButtonMu: TSpeedButton Left = 166 Top = 184 Width = 36 Height = 36 Hint = 'X = Y * X' Font.Color = clBlack Font.Height = -33 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] Glyph.Data = { E6000000424DE6000000000000007600000028000000100000000E0000000100 0400000000007000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFF0FFFFFFF0FFFFFFF00FFFFF00FFFFFFFF00FFF00F FFFFFFFFF00F00FFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFF00F00FF FFFFFFFF00FFF00FFFFFFFF00FFFFF00FFFFFFF0FFFFFFF0FFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFF} ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButtonMuClick end object SpeedButtonD: TSpeedButton Left = 218 Top = 184 Width = 36 Height = 36 Hint = 'X = Y / X' Font.Color = clBlack Font.Height = -33 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] Glyph.Data = { E6000000424DE6000000000000007600000028000000100000000E0000000100 0400000000007000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFF FFFFFFFFFFFFFFFFFFFFFFF0000000000FFFFFF0000000000FFFFFFFFFFFFFFF FFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFF} ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButtonDClick end object SpeedButtonR: TSpeedButton Left = 243 Top = 14 Width = 36 Height = 36 Hint = 'Down Roll' Font.Color = clBlack Font.Height = -20 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] Glyph.Data = { E6000000424DE6000000000000007600000028000000100000000E0000000100 0400000000007000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFFFFF0FFFF00FFF00FFF000FFF00FFF00FF00000FF00FFF00FFF000FFF00FF F00FFF000FFF00FFF00FFF000FFF000000FFFF000FFF000000FFFF000FFF00FF F00FFF000FFF00FFF00FFF000FFF00FFF00FFF000FFF0000000FFF000FFF0000 00FFFFFFFFFFFFFFFFFF} ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButtonRClick end object SpeedButtonxy: TSpeedButton Left = 243 Top = 55 Width = 36 Height = 36 Hint = 'X Y interchange' Font.Color = clBlack Font.Height = -33 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] Glyph.Data = { E6000000424DE6000000000000007600000028000000100000000E0000000100 0400000000007000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFF00FF00FFFFFF00FF00FF00FFF0FF00FF00FF00F0000F 00FF00FF00FFF0FF00FFF0000FF0FFFF00FFFF00FF0000F0000FF0000FF0FFF0 000F00FF00FFFF00FF0000FF00FFFF00FF0000FF00FFFF00FF00FFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFF} ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButtonxyClick end object SpeedButtonPM: TSpeedButton Left = 12 Top = 184 Width = 36 Height = 36 Hint = 'Change sign' Font.Color = clBlack Font.Height = -17 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] Glyph.Data = { E6000000424DE6000000000000007600000028000000100000000E0000000100 0400000000007000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00F00FFFFFFFFF FFFFFF00FFFFFFFFFFFFFFF00FFFFFFFFFFFFFFF00FFFF000000FFFFF00FFF00 0000FFFFFF00FFFFFFFFFFFFFFF00FFFFFFFFFFFFFFF00FFFFFFFF00FFFFF00F FFFFFF00FFFFFF00FFFF000000FFFFF00FFF000000FFFFFF00FFFF00FFFFFFFF F00FFF00FFFFFFFFFF00} ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButtonPMClick end object SpeedButtonYX: TSpeedButton Left = 269 Top = 184 Width = 36 Height = 36 Hint = 'X = Y^X' Font.Color = clBlack Font.Height = -17 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] Glyph.Data = { E6000000424DE6000000000000007600000028000000100000000E0000000100 0400000000007000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFF FFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFF0000FF0FFFF0FFF00FF00F00FF 00FFF00FF00FF0000FFFF0FFFF0FFF00FFFFFFFFFFFFF0000FFFFFFFFFFF00FF 00FFFFFFFFFF0FFFF0FF} ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButtonYXClick end object SpeedButton1X: TSpeedButton Left = 424 Top = 184 Width = 36 Height = 36 Hint = 'X = 1 / X' Font.Color = clBlack Font.Height = -17 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] Glyph.Data = { E6000000424DE6000000000000007600000028000000100000000E0000000100 0400000000007000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFF0FFFFF0FF FFF0FFF00FFFF00FFF00FFFF0FFFFF00F00FF00F00FFFFF000FFF00FF0FFFFF0 00FFF00FF00FFF00F00FF00FFF0FF00FFF00F00FFF00F0FFFFF0F00FFFF0FFFF FFFFF00FFFF00FFFFFFFF00FFFFF0FFFFFFF000FFFFF00FFFFFFF00FFFFFF0FF FFFFFFFFFFFFF0FFFFFF} ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButton1XClick end object SpeedButtonCE: TSpeedButton Left = 289 Top = 55 Width = 36 Height = 36 Hint = 'Clear X' Caption = 'CX' Font.Color = clBlack Font.Height = -17 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButtonCEClick end object SpeedButtonC: TSpeedButton Left = 289 Top = 14 Width = 36 Height = 36 Hint = 'Clear All' Caption = 'CA' Font.Color = clBlack Font.Height = -17 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButtonCClick end object Label5: TLabel Left = 221 Top = 237 Width = 73 Height = 28 Alignment = taCenter AutoSize = False Caption = 'Degrees' Font.Color = clRed Font.Height = -15 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False end object SpeedButtonPME: TSpeedButton Left = 475 Top = 184 Width = 36 Height = 36 Hint = 'Change sign E+/-' Font.Color = clBlack Font.Height = -17 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] Glyph.Data = { 1E010000424D1E010000000000007600000028000000120000000E0000000100 040000000000A800000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFFFF000000FFFFFFFFFFFFFFFFFF00000000000FFF0FFF0000000000000000 0FFF00FF00000000000000FFFFFFF00FFFFFFF00000000FFFFFFFF00FFFFFF00 00000000FFFFFFF00FFFFF0000000000FFFFF00F00FFFF00000000FFFFFFF00F F00FFF00000000FFFFF000000F00FF00000000000FF000000FF00F0000000000 0FFFF00FFFFF0F000000FFFFFFFFF00FFFFFFF000000FFFFFFFFFFFFFFFFFF00 0000} ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButtonPMEClick end object SpeedButtonsqrt: TSpeedButton Left = 321 Top = 184 Width = 36 Height = 36 Hint = 'X = X^0.5' Font.Color = clBlack Font.Height = -17 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] Glyph.Data = { E6000000424DE6000000000000007600000028000000100000000E0000000100 0400000000007000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00F0FFFFFFFFFF FFFFF0FFFFFFFFFFFFFFF0FFFFFFFFFFFFFF000FFFF0FFFF0FFF0F0FFFF00FF0 0FFF0F0FFFFF0000FFFF0F00FFFFF00FFFFF0FF0FFFFF00FFFFFFFF0FFFF0000 FFFFFFF00FF00FF00FFFFFFF0FF0FFFF0FFFFFFF0FFFFFFFFFFFFFFF0FFFFFFF FFF0FFFFF0000000000F} ParentFont = False ParentShowHint = False ShowHint = True OnClick = ButtonsqrtClick end object SpeedButtonX2: TSpeedButton Left = 372 Top = 184 Width = 36 Height = 36 Hint = 'X = X^2' Font.Color = clBlack Font.Height = -17 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] Glyph.Data = { E6000000424DE6000000000000007600000028000000100000000E0000000100 0400000000007000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00F0FFFFFF0FFF FFFFF00FFFF00FFFFFFFFF00FF00FFFFFFFFFFF0000FFFFFFFFFFFFF00FFFFFF FFFFFFFF00FFFFFFFFFFFFF0000FF000000FFF00FF00FF00000FF00FFFF00FF0 0FFFF0FFFFFF0FFF00FFFFFFFFFFFFFFF00FFFFFFFFFF0FFF00FFFFFFFFFF000 00FFFFFFFFFFFF000FFF} ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButtonX2Click end object EditX: TEdit Left = 39 Top = 139 Width = 193 Height = 33 AutoSize = False Font.Color = clBlack Font.Height = -23 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnKeyPress = EditXKeyPress OnKeyUp = EditXKeyUp end object ButtonE: TButton Left = 243 Top = 137 Width = 83 Height = 36 Caption = 'Enter' Font.Color = clBlack Font.Height = -20 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False TabOrder = 1 TabStop = False OnClick = ButtonEClick end object EditY: TEdit Left = 39 Top = 98 Width = 193 Height = 33 TabStop = False AutoSize = False Color = clLime Font.Color = clBlack Font.Height = -23 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 2 end object EditZ: TEdit Left = 39 Top = 57 Width = 193 Height = 33 TabStop = False AutoSize = False Color = clLime Font.Color = clBlack Font.Height = -23 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 3 end object EditT: TEdit Left = 39 Top = 16 Width = 193 Height = 33 TabStop = False AutoSize = False Color = clLime Font.Color = clBlack Font.Height = -23 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 4 end object ButtonH: TButton Left = 334 Top = 14 Width = 83 Height = 36 HelpContext = 150 Caption = 'Help' Font.Color = clBlack Font.Height = -20 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False TabOrder = 5 TabStop = False OnClick = ButtonHClick end object Buttonsin: TButton Left = 12 Top = 236 Width = 66 Height = 31 Caption = 'sin (x)' Font.Color = clBlack Font.Height = -15 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 6 TabStop = False OnClick = ButtonsinClick end object Buttoncos: TButton Left = 83 Top = 236 Width = 66 Height = 31 Caption = 'cos (x)' Font.Color = clBlack Font.Height = -15 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 7 TabStop = False OnClick = ButtoncosClick end object Buttontan: TButton Left = 154 Top = 236 Width = 66 Height = 31 Caption = 'tan (x)' Font.Color = clBlack Font.Height = -15 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 8 TabStop = False OnClick = ButtontanClick end object Buttonasin: TButton Left = 12 Top = 279 Width = 66 Height = 31 Caption = 'asin(x)' Font.Color = clBlack Font.Height = -15 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 9 TabStop = False OnClick = ButtonasinClick end object Buttonacos: TButton Left = 83 Top = 279 Width = 66 Height = 31 Caption = 'acos(x)' Font.Color = clBlack Font.Height = -15 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 10 TabStop = False OnClick = ButtonacosClick end object Buttonatan: TButton Left = 154 Top = 279 Width = 66 Height = 31 Caption = 'atan(x)' Font.Color = clBlack Font.Height = -15 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 11 TabStop = False OnClick = ButtonatanClick end object Buttondeg: TButton Left = 224 Top = 279 Width = 70 Height = 31 Hint = 'Toggle deg/rad' Caption = 'deg/rad' Font.Color = clBlack Font.Height = -15 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 12 TabStop = False OnClick = ButtondegClick end object Buttonlog: TButton Left = 374 Top = 236 Width = 66 Height = 31 Caption = 'log(x)' Font.Color = clBlack Font.Height = -15 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 13 TabStop = False OnClick = ButtonlogClick end object Button10X: TButton Left = 374 Top = 279 Width = 66 Height = 31 Caption = '10^x' Font.Color = clBlack Font.Height = -15 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 14 TabStop = False OnClick = Button10XClick end object Buttonln: TButton Left = 445 Top = 236 Width = 66 Height = 31 Caption = 'ln (x)' Font.Color = clBlack Font.Height = -15 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 15 TabStop = False OnClick = ButtonlnClick end object Buttonex: TButton Left = 445 Top = 279 Width = 66 Height = 31 Caption = 'e^x' Font.Color = clBlack Font.Height = -15 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 16 TabStop = False OnClick = ButtonexClick end object Buttondegrad: TButton Left = 299 Top = 236 Width = 71 Height = 31 Hint = 'Convert X to rad' Caption = 'deg>rad' Font.Color = clBlack Font.Height = -15 Font.Name = 'Times New Roman Special G1' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 17 TabStop = False OnClick = ButtondegradClick end object Buttonraddeg: TButton Left = 299 Top = 279 Width = 71 Height = 31 Hint = 'Convert X to deg' Caption = 'deg