home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2000 August
/
chip_08_2000.iso
/
software
/
astro
/
starcalc
/
STARCALC.EXE
/
0
/
RCDATA
/
TSOLARFORM
/
TSOLARFORM.txt
Wrap
Text File
|
2000-05-28
|
4KB
|
191 lines
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