Chip 2000 August/chip_08_2000.iso/software/astro/starcalc/STARCALC.EXE/0/RCDATA/TGRIDSETUPFORM/TGRIDSETUPFORM.txt

Text File | 2000-05-28 | 8KB | 354 lines

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