Hot Shareware 35/hot35.iso/ficheros/9EDU/VIN32_96.ZIP/VIN32.EXE/0/RCDATA/TCALCF/TCALCF.txt

Text File | 1998-04-25 | 24KB | 876 lines

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 = {<image000.ico>}
  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<rad'
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'Times New Roman Special G1'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 18
    TabStop = False
    OnClick = ButtonraddegClick
  end
  object ButtonPaste: TButton
    Left = 334
    Top = 137
    Width = 83
    Height = 36
    Hint = 'X = Win Clip'
    Caption = 'Paste'
    Font.Color = clBlack
    Font.Height = -20
    Font.Name = 'Times New Roman Special G1'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 19
    TabStop = False
    OnClick = ButtonPasteClick
  end
  object ButtonSTO: TButton
    Left = 428
    Top = 96
    Width = 83
    Height = 36
    Hint = 'Store M=X'
    Caption = 'STO'
    Font.Color = clBlack
    Font.Height = -20
    Font.Name = 'Times New Roman Special G1'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 20
    TabStop = False
    OnClick = ButtonSTOClick
  end
  object ButtonRCL: TButton
    Left = 428
    Top = 137
    Width = 83
    Height = 36
    Hint = 'Recall X=M'
    Caption = 'RCL'
    Font.Color = clBlack
    Font.Height = -20
    Font.Name = 'Times New Roman Special G1'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 21
    TabStop = False
    OnClick = ButtonRCLClick
  end
  object ButtonExit: TButton
    Left = 428
    Top = 14
    Width = 83
    Height = 36
    Hint = 'Close Calculator'
    Caption = 'Done'
    Font.Color = clBlack
    Font.Height = -20
    Font.Name = 'Times New Roman Special G1'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 22
    TabStop = False
    OnClick = ButtonExitClick
  end
  object ButtonCOPY: TButton
    Left = 334
    Top = 96
    Width = 83
    Height = 36
    Hint = 'Win Clip=X'
    Caption = 'Copy'
    Font.Color = clBlack
    Font.Height = -20
    Font.Name = 'Times New Roman Special G1'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 23
    TabStop = False
    OnClick = ButtonCOPYClick
  end
  object Buttontop: TButton
    Left = 334
    Top = 55
    Width = 83
    Height = 36
    Hint = 'Click moves to back'
    Caption = 'Top'
    Font.Color = clBlack
    Font.Height = -20
    Font.Name = 'Times New Roman Special G1'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 24
    TabStop = False
    OnClick = ButtontopClick
  end
  object ButtonSmall: TButton
    Left = 428
    Top = 55
    Width = 83
    Height = 36
    Hint = 'Click to shrink'
    Caption = 'Trig'
    Font.Color = clBlack
    Font.Height = -20
    Font.Name = 'Times New Roman Special G1'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 25
    TabStop = False
    OnClick = ButtonSmallClick
  end
  object Buttonedit: TButton
    Left = 243
    Top = 96
    Width = 83
    Height = 36
    Hint = 'Edit number in X reg'
    Caption = 'Edit X'
    Font.Color = clBlack
    Font.Height = -20
    Font.Name = 'Times New Roman Special G1'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 26
    TabStop = False
    OnClick = ButtoneditClick
  end
end