home *** CD-ROM | disk | FTP | other *** search
- object RandomForm: TRandomForm
- Left = 378
- Top = 137
- BorderIcons = [biSystemMenu]
- BorderStyle = bsSingle
- Caption = 'Generate a random level'
- ClientHeight = 69
- ClientWidth = 296
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poDesktopCenter
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 24
- Top = 12
- Width = 98
- Height = 13
- Caption = 'How many lights on?'
- end
- object NumTackBar: TTrackBar
- Left = 8
- Top = 32
- Width = 177
- Height = 33
- Max = 25
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 1
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = NumTackBarChange
- end
- object LightsBox: TEdit
- Left = 136
- Top = 8
- Width = 41
- Height = 21
- TabOrder = 0
- Text = '1'
- OnChange = LightsBoxChange
- end
- object Panel1: TPanel
- Left = 192
- Top = 8
- Width = 89
- Height = 41
- BevelOuter = bvLowered
- TabOrder = 2
- object GenerateBox: TButton
- Left = 6
- Top = 8
- Width = 75
- Height = 25
- Caption = '&Generate'
- TabOrder = 0
- OnClick = GenerateBoxClick
- end
- end
- end
-