home *** CD-ROM | disk | FTP | other *** search
/ Delphi Programming Unleashed / Delphi_Programming_Unleashed_SAMS_Publishing_1995.iso / chap11 / morefunc / main.txt < prev    next >
Encoding:
Text File  |  1995-03-21  |  5.7 KB  |  221 lines
  1. object Form1: TForm1
  2.   Left = 158
  3.   Top = 99
  4.   ActiveControl = BCalc
  5.   AutoScroll = False
  6.   Caption = 'More Functions'
  7.   ClientHeight = 246
  8.   ClientWidth = 460
  9.   Color = clSilver
  10.   Font.Color = clWindowText
  11.   Font.Height = -13
  12.   Font.Name = 'System'
  13.   Font.Style = []
  14.   Icon.Data = {
  15.     0000010001002020100000000000E80200001600000028000000200000004000
  16.     0000010004000000000000020000000000000000000000000000000000000000
  17.     0000000080000080000000808000800000008000800080800000C0C0C0008080
  18.     80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
  19.     00000000000000000000000000000ECECC0FFFFFFFFF770000CCCC0C0FF00EEC
  20.     CCC07FFFF00000CCCCCCCC0C07700CCCCCC00FFF00CEECEECCCCC00C0F700CEC
  21.     ECCC077FF00CCECECCCCC0000F700EECCC000F7FF7000EECCCCCC0C077700CC0
  22.     00CE0F7FFFF00CCECCCCC0C0FFF00C0EEC00077FFFF700EECECC0000F77000CE
  23.     000FFFFFFFF7F0CCECCC0C0777F00E000FFFF7777FF7FF0CCECC000FFFF0000F
  24.     FF7777FF7FF777700CEC007FF770077FFF7FFFFF7FFFFFFF00C0007777F00000
  25.     0F7FF7777FFFF77770000FFFFFF00440000777FFFFFFF7FFFF000FFF77700C5C
  26.     0000FFF7777FF7FF77FFFFFF7FF00CC5C5500777FF7FF7777FFFFFFF7FF00CCC
  27.     5C450FFFFF7FFFFFFF7777FF77700CCCC5C440F7777FFFF7777FF7FFFFF00CCC
  28.     CCCC5077FFFFFFF7FFFFF7FFFFF00CCCCCC5C0FFF7777FF7FF00000FF8800CCC
  29.     CCCC407777FF7FF7704C445088800CECCCCCC07FFFFF7FFF0CC5C5C409500ECE
  30.     CCCC0F7FF7777FFF0CCCCC5405900EECECCC0F7777FFFFF70CCCCCC505500EEE
  31.     CCC0FFFFFFFFFFF80CECCCCC05500CCCC007FFFFFFFFF8850CCEECCC05500000
  32.     0777FFFFF888895950CECEC055500FFFFFFFFF88889595959500000595500FFF
  33.     F888889999599955595555555550088885959595959555559595959555500999
  34.     9999595559595555555555555550000000000000000000000000000000000000
  35.     0000000000000000000000000000000000000000000000000000000000000000
  36.     0000000000000000000000000000000000000000000000000000000000000000
  37.     0000000000000000000000000000000000000000000000000000000000000000
  38.     000000000000000000000000000000000000000000000000000000000000}
  39.   PixelsPerInch = 96
  40.   Visible = True
  41.   TextHeight = 16
  42.   object Label2: TLabel
  43.     Left = 16
  44.     Top = 16
  45.     Width = 58
  46.     Height = 20
  47.     AutoSize = False
  48.     Caption = 'XNum'
  49.     Color = clSilver
  50.     Font.Color = clBlue
  51.     Font.Height = -16
  52.     Font.Name = 'Times New Roman'
  53.     Font.Style = [fsBold]
  54.     ParentColor = False
  55.     ParentFont = False
  56.   end
  57.   object Label3: TLabel
  58.     Left = 16
  59.     Top = 72
  60.     Width = 58
  61.     Height = 20
  62.     AutoSize = False
  63.     Caption = 'YNum'
  64.     Color = clSilver
  65.     Font.Color = clBlue
  66.     Font.Height = -16
  67.     Font.Name = 'Times New Roman'
  68.     Font.Style = [fsBold]
  69.     ParentColor = False
  70.     ParentFont = False
  71.   end
  72.   object BCalc: TButton
  73.     Left = 136
  74.     Top = 192
  75.     Width = 114
  76.     Height = 30
  77.     Caption = 'Calc'
  78.     TabOrder = 0
  79.     OnClick = BCalcClick
  80.   end
  81.   object Panel1: TPanel
  82.     Left = 16
  83.     Top = 128
  84.     Width = 236
  85.     Height = 38
  86.     BevelInner = bvLowered
  87.     Caption = 'Panel1'
  88.     Color = clNavy
  89.     Font.Color = clYellow
  90.     Font.Height = -16
  91.     Font.Name = 'Times New Roman'
  92.     Font.Style = [fsBold]
  93.     ParentFont = False
  94.     TabOrder = 1
  95.     object Label1: TLabel
  96.       Left = 8
  97.       Top = 8
  98.       Width = 178
  99.       Height = 20
  100.       AutoSize = False
  101.       Caption = 'Label1'
  102.       Color = clNavy
  103.       ParentColor = False
  104.     end
  105.   end
  106.   object Edit1: TEdit
  107.     Left = 72
  108.     Top = 16
  109.     Width = 180
  110.     Height = 27
  111.     Color = clNavy
  112.     Font.Color = clYellow
  113.     Font.Height = -16
  114.     Font.Name = 'Times New Roman'
  115.     Font.Style = [fsBold]
  116.     ParentFont = False
  117.     TabOrder = 2
  118.     Text = 'Edit1'
  119.   end
  120.   object Edit2: TEdit
  121.     Left = 72
  122.     Top = 72
  123.     Width = 180
  124.     Height = 27
  125.     Color = clNavy
  126.     Font.Color = clYellow
  127.     Font.Height = -16
  128.     Font.Name = 'Times New Roman'
  129.     Font.Style = [fsBold]
  130.     ParentFont = False
  131.     TabOrder = 3
  132.     Text = 'Edit2'
  133.   end
  134.   object Panel2: TPanel
  135.     Left = 272
  136.     Top = 16
  137.     Width = 169
  138.     Height = 214
  139.     BevelInner = bvLowered
  140.     BevelWidth = 2
  141.     Color = clNavy
  142.     TabOrder = 4
  143.     object RBXToTheY: TRadioButton
  144.       Left = 32
  145.       Top = 24
  146.       Width = 105
  147.       Height = 20
  148.       Caption = 'XToTheY'
  149.       Color = clNavy
  150.       Font.Color = clYellow
  151.       Font.Height = -16
  152.       Font.Name = 'Times New Roman'
  153.       Font.Style = [fsBold]
  154.       ParentColor = False
  155.       ParentFont = False
  156.       TabOrder = 0
  157.       OnClick = RBClick
  158.     end
  159.     object RBArcSin: TRadioButton
  160.       Tag = 1
  161.       Left = 32
  162.       Top = 72
  163.       Width = 105
  164.       Height = 20
  165.       Caption = 'ArcSin'
  166.       Color = clNavy
  167.       Font.Color = clYellow
  168.       Font.Height = -16
  169.       Font.Name = 'Times New Roman'
  170.       Font.Style = [fsBold]
  171.       ParentColor = False
  172.       ParentFont = False
  173.       TabOrder = 1
  174.       OnClick = RBClick
  175.     end
  176.     object RBArcCos: TRadioButton
  177.       Tag = 2
  178.       Left = 32
  179.       Top = 120
  180.       Width = 105
  181.       Height = 20
  182.       Caption = 'ArcCos'
  183.       Color = clNavy
  184.       Font.Color = clYellow
  185.       Font.Height = -16
  186.       Font.Name = 'Times New Roman'
  187.       Font.Style = [fsBold]
  188.       ParentColor = False
  189.       ParentFont = False
  190.       TabOrder = 2
  191.       OnClick = RBClick
  192.     end
  193.     object RBLogYX: TRadioButton
  194.       Tag = 3
  195.       Left = 32
  196.       Top = 168
  197.       Width = 105
  198.       Height = 20
  199.       Caption = 'LogXY'
  200.       Color = clNavy
  201.       Font.Color = clYellow
  202.       Font.Height = -16
  203.       Font.Name = 'Times New Roman'
  204.       Font.Style = [fsBold]
  205.       ParentColor = False
  206.       ParentFont = False
  207.       TabOrder = 3
  208.       OnClick = RBClick
  209.     end
  210.   end
  211.   object BClose: TButton
  212.     Left = 16
  213.     Top = 192
  214.     Width = 106
  215.     Height = 30
  216.     Caption = 'Close'
  217.     TabOrder = 5
  218.     OnClick = BCloseClick
  219.   end
  220. end
  221.