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