object ArgoWaypDlg: TArgoWaypDlg Left = 49 Top = 0 Width = 536 Height = 104 HelpContext = 3 BorderIcons = [biSystemMenu] Caption = 'Argonaut-Waypoints' Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] Icon.Data = {} Menu = MainMenu1Wayp PixelsPerInch = 96 OnActivate = FormActivate TextHeight = 16 object Edit1: TEdit Left = 0 Top = 0 Width = 529 Height = 25 AutoSize = False Font.Color = clRed Font.Height = -13 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 0 Text = 'Nr1' end object Edit2: TEdit Left = 0 Top = 24 Width = 529 Height = 25 AutoSize = False Color = clSilver Font.Color = clBlack Font.Height = -13 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 1 Text = 'Nr2' end object MainMenu1Wayp: TMainMenu Left = 392 Top = 8 object File1: TMenuItem Caption = '&File' object Loadwaypoints1: TMenuItem Caption = 'Load waypoints' OnClick = Loadwaypoints1Click end object Savewaypoints1: TMenuItem Caption = 'Save waypoints' OnClick = Savewaypoints1Click end object Printwaypoints1: TMenuItem Caption = 'Print waypoints' OnClick = Printwaypoints1Click end object Clearwaypoints1: TMenuItem Caption = 'Clear waypoints' OnClick = Clearwaypoints1Click end object Close1: TMenuItem Caption = 'Close' OnClick = Close1Click ShortCutText = 'Ctrl+C' end end object First1: TMenuItem Caption = 'F&irst' OnClick = First1Click end object Minus7: TMenuItem Caption = '-7' OnClick = Minus7Click ShortCutText = 'Ctrl+F7' end object Prev1: TMenuItem Caption = '&Prev' OnClick = Prev1Click end object Next1: TMenuItem Caption = '&Next' OnClick = Next1Click end object Plus7: TMenuItem Caption = '+7' OnClick = Plus7Click ShortCutText = 'Shift+F7' end object Last1: TMenuItem Caption = '&Last' OnClick = Last1Click end object Help1: TMenuItem Caption = '&Help' OnClick = Help1Click end end object SaveDialog1: TSaveDialog DefaultExt = 'WAY' Filter = 'Waypoint files|*.WAY' Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist] Title = 'Save waypoints' Left = 472 Top = 8 end object OpenDialog1: TOpenDialog DefaultExt = 'WAY' Filter = 'Waypoint files|*.WAY' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist] Title = 'Load waypoints' Left = 432 Top = 8 end end