home *** CD-ROM | disk | FTP | other *** search
/ Delphi Programming Unleashed / Delphi_Programming_Unleashed_SAMS_Publishing_1995.iso / misc / objects / listsub / main.txt < prev    next >
Encoding:
Text File  |  1995-03-21  |  772 b   |  40 lines
  1. object Form1: TForm1
  2.   Left = 212
  3.   Top = 94
  4.   ActiveControl = Button1
  5.   AutoScroll = False
  6.   Caption = 'New ListBox Type'
  7.   ClientHeight = 265
  8.   ClientWidth = 427
  9.   Color = clYellow
  10.   Font.Color = clWindowText
  11.   Font.Height = -13
  12.   Font.Name = 'System'
  13.   Font.Style = []
  14.   PixelsPerInch = 96
  15.   TextHeight = 20
  16.   object Button1: TButton
  17.     Left = 66
  18.     Top = 224
  19.     Width = 129
  20.     Height = 33
  21.     Caption = 'Create LBox'
  22.     TabOrder = 0
  23.     OnClick = Button1Click
  24.   end
  25.   object GetCurrent: TButton
  26.     Left = 233
  27.     Top = 224
  28.     Width = 129
  29.     Height = 33
  30.     Caption = 'Get Selection'
  31.     Enabled = False
  32.     TabOrder = 1
  33.     OnClick = GetCurrentClick
  34.   end
  35.   object Database1: TDatabase
  36.     Left = 8
  37.     Top = 8
  38.   end
  39. end
  40.