object frmCustomBoard: TfrmCustomBoard Left = 254 Top = 75 ActiveControl = btnOk BorderIcons = [biSystemMenu, biHelp] BorderStyle = bsSingle Caption = 'Custom Board' ClientHeight = 299 ClientWidth = 181 Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] Position = poScreenCenter OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 16 object Bevel1: TBevel Left = 7 Top = 259 Width = 168 Height = 6 Shape = bsBottomLine end object Bevel2: TBevel Left = 7 Top = 44 Width = 168 Height = 9 Shape = bsBottomLine end object PreviewGrid: TDrawGrid Left = 55 Top = 107 Width = 94 Height = 48 HelpContext = 4004 TabStop = False Color = clNavy ColCount = 10 DefaultColWidth = 8 DefaultRowHeight = 8 FixedColor = clNavy FixedCols = 0 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine] PopupMenu = pmenuWhatsThis ScrollBars = ssNone TabOrder = 0 ColWidths = ( 8 8 8 8 8 8 8 8 8 8) end object tbarColumns: TTrackBar Left = 52 Top = 61 Width = 108 Height = 47 HelpContext = 4001 Min = 1 Orientation = trHorizontal PopupMenu = pmenuWhatsThis Frequency = 1 Position = 1 SelEnd = 0 SelStart = 0 TabOrder = 1 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = tbarColumnsChange end object tbarRows: TTrackBar Left = 11 Top = 105 Width = 45 Height = 153 HelpContext = 4002 Max = 15 Min = 1 Orientation = trVertical PopupMenu = pmenuWhatsThis Frequency = 1 Position = 1 SelEnd = 0 SelStart = 0 TabOrder = 2 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = tbarRowsChange end object btnCancel: TButton Left = 94 Top = 271 Width = 75 Height = 25 HelpContext = 2 Cancel = True Caption = 'Cancel' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 2 ParentFont = False PopupMenu = pmenuWhatsThis TabOrder = 4 end object btnOk: TButton Left = 11 Top = 271 Width = 75 Height = 25 HelpContext = 1 Caption = 'OK' Default = True Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 1 ParentFont = False PopupMenu = pmenuWhatsThis TabOrder = 3 end object Panel1: TPanel Left = 40 Top = 3 Width = 102 Height = 41 HelpContext = 4003 Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False PopupMenu = pmenuWhatsThis TabOrder = 5 object Label1: TLabel Left = 4 Top = 5 Width = 94 Height = 13 Alignment = taCenter Caption = 'Board Dimensions:' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object GameDimensionsLabel: TLabel Left = 5 Top = 23 Width = 92 Height = 13 Alignment = taCenter AutoSize = False Caption = '5 x 10' Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end end object pmenuWhatsThis: TPopupMenu Left = 145 Top = 227 object pmitemWhatsThis: TMenuItem Caption = '&What'#39's This?' ShortCut = 0 OnClick = pmitemWhatsThisClick end end end