home *** CD-ROM | disk | FTP | other *** search
/ Delphi Programming Unleashed / Delphi_Programming_Unleashed_SAMS_Publishing_1995.iso / misc / polybtn / main.txt < prev    next >
Encoding:
Text File  |  1995-03-21  |  952 b   |  51 lines

  1. object Form1: TForm1
  2.   Left = 156
  3.   Top = 107
  4.   ActiveControl = Food
  5.   AutoScroll = False
  6.   Caption = 'Dynamic Delegation'
  7.   ClientHeight = 265
  8.   ClientWidth = 427
  9.   Font.Color = clWindowText
  10.   Font.Height = -16
  11.   Font.Name = 'System'
  12.   Font.Style = []
  13.   PixelsPerInch = 120
  14.   TextHeight = 20
  15.   object Food: TButton
  16.     Left = 136
  17.     Top = 224
  18.     Width = 153
  19.     Height = 33
  20.     Caption = 'Food'
  21.     TabOrder = 0
  22.     OnClick = FoodClick
  23.   end
  24.   object SetWork: TButton
  25.     Left = 45
  26.     Top = 176
  27.     Width = 153
  28.     Height = 33
  29.     Caption = 'Set Work'
  30.     TabOrder = 1
  31.     OnClick = SetWorkClick
  32.   end
  33.   object SetFood: TButton
  34.     Left = 245
  35.     Top = 176
  36.     Width = 153
  37.     Height = 33
  38.     Caption = 'Set Food'
  39.     TabOrder = 2
  40.     OnClick = SetFoodClick
  41.   end
  42.   object ListBox1: TListBox
  43.     Left = 21
  44.     Top = 8
  45.     Width = 385
  46.     Height = 161
  47.     ItemHeight = 20
  48.     TabOrder = 3
  49.   end
  50. end
  51.