object SolarForm: TSolarForm Left = 313 Top = 199 ActiveControl = OkBtn BorderStyle = bsDialog Caption = 'Solar System objects' ClientHeight = 182 ClientWidth = 217 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = CreateWork OnKeyDown = FormKeyDown PixelsPerInch = 96 TextHeight = 13 object GroupBox1: TGroupBox Left = 112 Top = 8 Width = 97 Height = 166 Caption = ' Planets ' Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 object MerCB: TCheckBox Left = 8 Top = 16 Width = 81 Height = 17 Caption = 'Mercury' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 end object VenCB: TCheckBox Left = 8 Top = 34 Width = 81 Height = 17 Caption = 'Venus' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 end object MarCB: TCheckBox Left = 8 Top = 52 Width = 81 Height = 17 Caption = 'Mars' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 end object JupCB: TCheckBox Left = 8 Top = 70 Width = 81 Height = 17 Caption = 'Jupiter' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 end object SatCB: TCheckBox Left = 8 Top = 88 Width = 81 Height = 17 Caption = 'Saturn' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 end object UraCB: TCheckBox Left = 8 Top = 106 Width = 81 Height = 17 Caption = 'Uranus' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 end object NepCB: TCheckBox Left = 8 Top = 124 Width = 81 Height = 17 Caption = 'Neptune' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 6 end object PluCB: TCheckBox Left = 8 Top = 142 Width = 81 Height = 17 Caption = 'Pluto' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 7 end end object OkBtn: TButton Left = 8 Top = 125 Width = 89 Height = 22 Caption = '&Ok' Default = True ModalResult = 1 TabOrder = 2 OnClick = OkBtnClick OnKeyDown = FormKeyDown end object ExitBtn: TButton Left = 8 Top = 152 Width = 89 Height = 22 Caption = '&Cancel' ModalResult = 2 TabOrder = 3 OnKeyDown = FormKeyDown end object GroupBox2: TGroupBox Left = 8 Top = 8 Width = 89 Height = 61 TabOrder = 0 object SunCB: TCheckBox Left = 8 Top = 16 Width = 57 Height = 17 Caption = 'Sun' Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 end object MoonCB: TCheckBox Left = 8 Top = 34 Width = 57 Height = 17 Caption = 'Moon' Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 end end end