object GridSetupForm: TGridSetupForm Left = 229 Top = 173 ActiveControl = OkBtn BorderStyle = bsDialog Caption = 'Coordinate grids setup' ClientHeight = 222 ClientWidth = 331 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = FormCreate OnKeyDown = FormKeyDown PixelsPerInch = 96 TextHeight = 13 object AzimuthGrBox: TGroupBox Left = 6 Top = 2 Width = 318 Height = 90 Caption = ' Horizontal grid ' Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 object Label3: TLabel Left = 301 Top = 61 Width = 3 Height = 20 Caption = #39 Font.Color = clBlack Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 301 Top = 35 Width = 3 Height = 20 Caption = #39 Font.Color = clBlack Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object AzStepLbl: TLabel Left = 224 Top = 37 Width = 22 Height = 13 Caption = 'step:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object HorzStepLbl: TLabel Left = 224 Top = 63 Width = 22 Height = 13 Caption = 'step:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object AzimuthAuto: TCheckBox Left = 248 Top = 12 Width = 49 Height = 17 Alignment = taLeftJustify Caption = 'Auto' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = AzimuthAutoClick end object AzLines: TCheckBox Left = 16 Top = 36 Width = 129 Height = 17 Caption = 'Draw azimuth lines' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 end object AzLinesStep: TEdit Left = 253 Top = 35 Width = 31 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 4 ParentFont = False TabOrder = 2 Text = '1800' OnExit = AzLinesStepExit end object HorzLines: TCheckBox Left = 16 Top = 62 Width = 129 Height = 17 Caption = 'Draw horizontal lines' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 end object HorzLinesStep: TEdit Left = 253 Top = 61 Width = 31 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 4 ParentFont = False TabOrder = 5 Text = '1800' OnExit = HorzLinesStepExit end object AzLinesUpDown: TUpDown Left = 284 Top = 35 Width = 15 Height = 21 Associate = AzLinesStep Min = 1 Max = 1800 Position = 1800 TabOrder = 3 Wrap = False end object HorzLinesUpDown: TUpDown Left = 284 Top = 61 Width = 15 Height = 21 Associate = HorzLinesStep Min = 1 Max = 1800 Position = 1800 TabOrder = 6 Wrap = False end end object EquatGrBox: TGroupBox Left = 6 Top = 98 Width = 318 Height = 90 Caption = ' Equatorial grid ' Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 object Label7: TLabel Left = 301 Top = 37 Width = 6 Height = 13 Caption = 's' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label8: TLabel Left = 301 Top = 61 Width = 3 Height = 20 Caption = #39 Font.Color = clBlack Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object RaStepLbl: TLabel Left = 224 Top = 37 Width = 22 Height = 13 Caption = 'step:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object DecStepLbl: TLabel Left = 224 Top = 63 Width = 22 Height = 13 Caption = 'step:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object EquatAuto: TCheckBox Left = 248 Top = 12 Width = 49 Height = 17 Alignment = taLeftJustify Caption = 'Auto' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = EquatAutoClick end object RaLines: TCheckBox Left = 16 Top = 36 Width = 153 Height = 17 Caption = 'Draw right ascension lines' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 end object DecLines: TCheckBox Left = 16 Top = 62 Width = 137 Height = 17 Caption = 'Draw declination lines' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 end object RaLinesStep: TEdit Left = 248 Top = 35 Width = 36 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 4 ParentFont = False TabOrder = 2 Text = '7200' OnExit = RaLinesStepExit end object DecLinesStep: TEdit Left = 248 Top = 61 Width = 36 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 4 ParentFont = False TabOrder = 5 Text = '1800' OnExit = DecLinesStepExit end object RaLinesUpDown: TUpDown Left = 284 Top = 35 Width = 15 Height = 21 Associate = RaLinesStep Min = 4 Max = 7200 Increment = 4 Position = 7200 TabOrder = 3 Wrap = False end object DecLinesUpDown: TUpDown Left = 284 Top = 61 Width = 15 Height = 21 Associate = DecLinesStep Min = 1 Max = 1800 Position = 1800 TabOrder = 6 Wrap = False end end object OkBtn: TButton Left = 47 Top = 195 Width = 97 Height = 22 Caption = '&Ok' Default = True ModalResult = 1 TabOrder = 2 OnClick = OkBtnClick OnKeyDown = FormKeyDown end object ExitBtn: TButton Left = 182 Top = 195 Width = 99 Height = 22 Caption = '&Cancel' ModalResult = 2 TabOrder = 3 OnKeyDown = FormKeyDown end end