home *** CD-ROM | disk | FTP | other *** search
/ Delphi Programming Unleashed / Delphi_Programming_Unleashed_SAMS_Publishing_1995.iso / chap11 / addall / main.txt < prev   
Encoding:
Text File  |  1995-03-21  |  4.1 KB  |  151 lines
  1. object Form1: TForm1
  2.   Left = 123
  3.   Top = 75
  4.   ActiveControl = Edit1
  5.   AutoScroll = False
  6.   Caption = 'Add A Column of Numbers'
  7.   ClientHeight = 244
  8.   ClientWidth = 428
  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.     00000000000000000000000000000ECECC0FFFFFFFFF880000CCCC0C0FF00EEC
  20.     CCC08FFFF00000CCCCCCCC0C08800CCCCCC00FFF00CEECEECCCCC00C0F800CEC
  21.     ECCC088FF00CCECECCCCC0000F800EECCC000F8FF8000EECCCCCC0C088800CC0
  22.     00CE0F8FFFF00CCECCCCC0C0FFF00C0EEC00088FFFF800EECECC0000F88000CE
  23.     000FFFFFFFF8F0CCECCC0C0888F00E000FFFF8888FF8FF0CCECC000FFFF0000F
  24.     FF8888FF8FF888800CEC008FF880088FFF8FFFFF8FFFFFFF00C0008888F00000
  25.     0F8FF8888FFFF88880000FFFFFF00440000888FFFFFFF8FFFF000FFF88800C5C
  26.     0000FFF8888FF8FF88FFFFFF8FF00CC5C5500888FF8FF8888FFFFFFF8FF00CCC
  27.     5C450FFFFF8FFFFFFF8888FF88800CCCC5C440F8888FFFF8888FF8FFFFF00CCC
  28.     CCCC5088FFFFFFF8FFFFF8FFFFF00CCCCCC5C0FFF8888FF8FF00000FF8800CCC
  29.     CCCC408888FF8FF8804C445088800CECCCCCC08FFFFF8FFF0CC5C5C409500ECE
  30.     CCCC0F8FF8888FFF0CCCCC5405900EECECCC0F8888FFFFF80CCCCCC505500EEE
  31.     CCC0FFFFFFFFFFF80CECCCCC05500CCCC008FFFFFFFFF8850CCEECCC05500000
  32.     0888FFFFF888895950CECEC055500FFFFFFFFF88889595959500000595500FFF
  33.     F888889999599955595555555550088885959595959555559595959555500999
  34.     9999595559595555555555555550000000000000000000000000000000000000
  35.     0000000000000000000000000000000000000000000000000000000000000000
  36.     0000000000000000000000000000000000000000000000000000000000000000
  37.     0000000000000000000000000000000000000000000000000000000000000000
  38.     000000000000000000000000000000000000000000000000000000000000}
  39.   PixelsPerInch = 96
  40.   OnCreate = FormCreate
  41.   TextHeight = 16
  42.   object Label2: TLabel
  43.     Left = 16
  44.     Top = 16
  45.     Width = 98
  46.     Height = 28
  47.     AutoSize = False
  48.     Caption = 'Add To List'
  49.   end
  50.   object Label1: TLabel
  51.     Left = 16
  52.     Top = 80
  53.     Width = 98
  54.     Height = 17
  55.     AutoSize = False
  56.     Caption = 'Answer:'
  57.   end
  58.   object ListBox1: TListBox
  59.     Left = 240
  60.     Top = 16
  61.     Width = 180
  62.     Height = 218
  63.     Color = clBlue
  64.     Font.Color = clYellow
  65.     Font.Height = -13
  66.     Font.Name = 'System'
  67.     Font.Style = [fsBold]
  68.     ItemHeight = 16
  69.     ParentFont = False
  70.     TabOrder = 5
  71.     OnDblClick = ListBox1DblClick
  72.   end
  73.   object Edit1: TEdit
  74.     Left = 128
  75.     Top = 16
  76.     Width = 100
  77.     Height = 33
  78.     Color = clBlue
  79.     Ctl3D = True
  80.     Font.Color = clYellow
  81.     Font.Height = -13
  82.     Font.Name = 'System'
  83.     Font.Style = [fsBold]
  84.     ParentCtl3D = False
  85.     ParentFont = False
  86.     TabOrder = 0
  87.     Text = 'Edit1'
  88.   end
  89.   object BPut: TButton
  90.     Left = 8
  91.     Top = 136
  92.     Width = 98
  93.     Height = 38
  94.     Caption = '&Put'
  95.     Default = True
  96.     TabOrder = 1
  97.     OnClick = BPutClick
  98.   end
  99.   object BCalc: TButton
  100.     Left = 128
  101.     Top = 136
  102.     Width = 98
  103.     Height = 38
  104.     Caption = '&Calc'
  105.     TabOrder = 2
  106.     OnClick = BCalcClick
  107.   end
  108.   object BClose: TButton
  109.     Left = 8
  110.     Top = 192
  111.     Width = 98
  112.     Height = 38
  113.     Caption = 'Clos&e'
  114.     TabOrder = 3
  115.     OnClick = BCloseClick
  116.   end
  117.   object BClear: TButton
  118.     Left = 128
  119.     Top = 192
  120.     Width = 98
  121.     Height = 38
  122.     Caption = 'C&lear'
  123.     TabOrder = 4
  124.     OnClick = BClearClick
  125.   end
  126.   object Panel1: TPanel
  127.     Left = 128
  128.     Top = 72
  129.     Width = 105
  130.     Height = 33
  131.     Caption = 'Panel1'
  132.     Color = clBlue
  133.     TabOrder = 6
  134.     object LResult: TLabel
  135.       Left = 5
  136.       Top = 5
  137.       Width = 93
  138.       Height = 23
  139.       AutoSize = False
  140.       Caption = 'LResult'
  141.       Color = clBlue
  142.       Font.Color = clYellow
  143.       Font.Height = -13
  144.       Font.Name = 'System'
  145.       Font.Style = [fsBold]
  146.       ParentColor = False
  147.       ParentFont = False
  148.     end
  149.   end
  150. end
  151.