home *** CD-ROM | disk | FTP | other *** search
- object ArgoMainDlg: TArgoMainDlg
- Left = 116
- Top = 22
- Width = 627
- Height = 97
- HelpContext = 1
- BorderIcons = [biSystemMenu, biMinimize]
- Caption = 'ArgoNaut Navigator Version 2.01'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- Icon.Data = {<image000.ico>}
- Menu = MainMenu1
- OnActivate = FormActivate
- OnCreate = FormCreate
- OnResize = FormResize
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object TabSet: TTabSet
- Left = 0
- Top = 30
- Width = 619
- Height = 21
- Cursor = crArrow
- Align = alBottom
- BackgroundColor = clBtnShadow
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'System'
- Font.Style = [fsBold]
- SelectedColor = clYellow
- Tabs.Strings = (
- 'Alarm'
- 'Comm'
- 'Course'
- 'Log'
- 'Position'
- 'Source'
- 'Speed'
- 'Wind'
- 'Extended')
- TabIndex = 0
- UnselectedColor = clSilver
- OnClick = TabSetClick
- end
- object TextPanel: TPanel
- Left = 0
- Top = 0
- Width = 578
- Height = 30
- Align = alClient
- BevelInner = bvLowered
- Caption =
- 'Lat 015�23.555'#39' Lon 023�48.000'#39' Last update: 12.55.00 Now: 12.58' +
- '.00'
- Color = clBlack
- Font.Color = clYellow
- Font.Height = -16
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- end
- object LarmPanel: TPanel
- Left = 578
- Top = 0
- Width = 41
- Height = 30
- Align = alRight
- BevelInner = bvLowered
- Color = clSilver
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- end
- object MainMenu1: TMainMenu
- Left = 8
- Top = 65528
- object File1: TMenuItem
- Caption = '&File'
- ShortCut = 0
- object Exit1: TMenuItem
- Caption = 'Exit'
- ShortCut = 16472
- OnClick = Exit1Click
- end
- end
- object Larm1: TMenuItem
- Caption = '&Alarm'
- ShortCut = 0
- OnClick = Larm1Click
- end
- object Map1: TMenuItem
- Caption = 'Char&t'
- ShortCut = 0
- OnClick = Map1Click
- end
- object Comm1: TMenuItem
- Caption = '&Comm'
- ShortCut = 0
- OnClick = Comm1Click
- end
- object Config1: TMenuItem
- Caption = '&Config'
- ShortCut = 0
- OnClick = Config1Click
- end
- object Log1: TMenuItem
- Caption = '&Log'
- ShortCut = 0
- OnClick = Log1Click
- end
- object Source1: TMenuItem
- Caption = '&Source'
- ShortCut = 0
- OnClick = Source1Click
- end
- object Warranties1: TMenuItem
- Caption = '&Important'
- ShortCut = 0
- OnClick = Warranties1Click
- end
- object Help1: TMenuItem
- Caption = '&Help'
- ShortCut = 0
- object About1: TMenuItem
- Caption = 'About'
- ShortCut = 0
- OnClick = About1Click
- end
- object Content1: TMenuItem
- Caption = 'Content'
- ShortCut = 0
- OnClick = Content1Click
- end
- object Warning1: TMenuItem
- Caption = 'Warning'
- ShortCut = 0
- OnClick = Warning1Click
- end
- end
- end
- object Timer1: TTimer
- Interval = 1100
- OnTimer = Timer1Timer
- Left = 488
- Top = 24
- end
- end
-