home *** CD-ROM | disk | FTP | other *** search
- object ArgosemaDlg: TArgosemaDlg
- Left = 21
- Top = 109
- HelpContext = 3
- ActiveControl = OKBtn
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'ArgoNaut - Select Chart'
- ClientHeight = 247
- ClientWidth = 593
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- Position = poScreenCenter
- OnActivate = FormActivate
- OnClose = FormClose
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 16
- Top = 48
- Width = 65
- Height = 13
- Caption = 'File record:'
- end
- object Label3: TLabel
- Left = 16
- Top = 16
- Width = 54
- Height = 13
- Caption = 'File-path:'
- end
- object Image1: TImage
- Left = 400
- Top = 78
- Width = 185
- Height = 163
- Stretch = True
- end
- object OKBtn: TBitBtn
- Left = 504
- Top = 8
- Width = 81
- Height = 25
- Hint = 'Close window.'
- Caption = 'Close'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnClick = OKBtnClick
- Glyph.Data = {
- DE010000424DDE01000000000000760000002800000024000000120000000100
- 0400000000006801000000000000000000000000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333330000333333333333333333333333F33333333333
- 00003333344333333333333333377F3333333333000033334224333333333333
- 337337F3333333330000333422224333333333333733337F3333333300003342
- 222224333333333373333337F3333333000034222A22224333333337F337F333
- 7F33333300003222A3A2224333333337F3737F337F33333300003A2A333A2224
- 33333337F73337F337F33333000033A33333A222433333337333337F337F3333
- 0000333333333A222433333333333337F337F33300003333333333A222433333
- 333333337F337F33000033333333333A222433333333333337F337F300003333
- 33333333A222433333333333337F337F00003333333333333A22433333333333
- 3337F37F000033333333333333A223333333333333337F730000333333333333
- 333A333333333333333337330000333333333333333333333333333333333333
- 0000}
- Margin = 2
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object HelpBtn: TBitBtn
- Left = 504
- Top = 40
- Width = 81
- Height = 25
- TabOrder = 1
- OnClick = HelpBtnClick
- Kind = bkHelp
- Margin = 2
- Spacing = -1
- IsControl = True
- end
- object OpenBtn: TBitBtn
- Left = 400
- Top = 8
- Width = 97
- Height = 25
- Hint = 'Open map-file'
- Caption = 'Open'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = OpenBtnClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
- 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
- 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
- 07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
- 0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
- 33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
- B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
- 3BB33773333773333773B333333B3333333B7333333733333337}
- NumGlyphs = 2
- end
- object SpinFilePos: TSpinEdit
- Left = 88
- Top = 40
- Width = 73
- Height = 24
- Hint = 'Select record from map-file (1-25).'
- AutoSize = False
- EditorEnabled = False
- MaxLength = 2
- MaxValue = 25
- MinValue = 1
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- Value = 1
- OnChange = SpinFilePosChange
- end
- object FilePathEdit: TEdit
- Left = 88
- Top = 8
- Width = 305
- Height = 21
- Hint = 'Click open-button to select map-file'
- TabStop = False
- ParentShowHint = False
- ReadOnly = True
- ShowHint = True
- TabOrder = 2
- end
- object GroupBox1: TGroupBox
- Left = 8
- Top = 72
- Width = 385
- Height = 169
- Caption = 'Map information'
- TabOrder = 7
- object LabelNWLat: TLabel
- Left = 8
- Top = 72
- Width = 5
- Height = 13
- Caption = ' '
- end
- object LabelNWLon: TLabel
- Left = 8
- Top = 96
- Width = 5
- Height = 13
- Caption = ' '
- end
- object LabelSELat: TLabel
- Left = 8
- Top = 120
- Width = 5
- Height = 13
- Caption = ' '
- end
- object LabelSELon: TLabel
- Left = 8
- Top = 144
- Width = 5
- Height = 13
- Caption = ' '
- end
- object LabelFileName: TLabel
- Left = 8
- Top = 24
- Width = 5
- Height = 13
- Caption = ' '
- end
- object LabelInfoText: TLabel
- Left = 8
- Top = 48
- Width = 5
- Height = 13
- Caption = ' '
- end
- end
- object AutoSelectBtn: TBitBtn
- Left = 168
- Top = 40
- Width = 225
- Height = 25
- Hint = 'Auto-Select BMP-file'
- Caption = 'Auto Select: Off'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- OnClick = AutoSelectBtnClick
- NumGlyphs = 2
- end
- object Show1Btn: TBitBtn
- Left = 400
- Top = 40
- Width = 97
- Height = 25
- Hint = 'Show BMP-picture. (Toggle stretch.)'
- Caption = 'Show'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- OnClick = Show1BtnClick
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
- 033333777777777773333330777777703333333773F333773333333330888033
- 33333FFFF7FFF7FFFFFF0000000000000003777777777777777F0FFFFFFFFFF9
- FF037F3333333337337F0F78888888887F037F33FFFFFFFFF37F0F7000000000
- 8F037F3777777777F37F0F70AAAAAAA08F037F37F3333337F37F0F70ADDDDDA0
- 8F037F37F3333337F37F0F70A99A99A08F037F37F3333337F37F0F70A99A99A0
- 8F037F37F3333337F37F0F70AAAAAAA08F037F37FFFFFFF7F37F0F7000000000
- 8F037F3777777777337F0F77777777777F037F3333333333337F0FFFFFFFFFFF
- FF037FFFFFFFFFFFFF7F000000000000000377777777777777730000}
- NumGlyphs = 2
- end
- object OpenMapDialog: TOpenDialog
- DefaultExt = 'MAP'
- FileEditStyle = fsEdit
- Filter = 'MAP-files|*.MAP'
- Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
- Left = 224
- Top = 8
- end
- object Timer1: TTimer
- OnTimer = Timer1Timer
- Left = 184
- Top = 8
- end
- end
-