home *** CD-ROM | disk | FTP | other *** search
- object MainForm: TMainForm
- Left = 245
- Top = 134
- HelpContext = 1
- ActiveControl = MainPanel
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsSingle
- Caption = 'Marine Adventures Order Entry'
- ClientHeight = 84
- ClientWidth = 401
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Menu = MainMenu
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object MainPanel: TPanel
- Left = 0
- Top = 0
- Width = 401
- Height = 49
- Align = alTop
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- object OrderBtn: TSpeedButton
- Left = 1
- Top = 1
- Width = 66
- Height = 45
- Hint = 'Enter new order'
- Caption = '&New Order'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000012000000140000000100
- 0400000000000000000000000000000000000000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333338765F03700000000000000030865F037FFFFFFFFFFFFFF037765F037FF
- FFFFFFFFFFFF03F865F037F444444444444F038765F037FFFFFFFFFFFFFF0308
- 65F037F44444444444FF036666C037FFFFFFFFFFFFFF0300000037F444444444
- 444F0389888837FFFFFFFFFFFFFF0300066E37F44444444444FF0300000037FF
- FFFFFFFFFFFF0301301937F444444444444F0300008837FFFFFFFFFFFFFF0300
- 0AAA37FFFFFFFFFFFFFF03AA2A2037F444FFFFFFFFFF03AA646437FFFFFFFFFF
- FFFF0304040837FFFFFFFFFFFFFF038899003777777777777777730000003333
- 33333333333333000000}
- Layout = blGlyphTop
- Spacing = 0
- OnClick = NewOrder
- end
- object BrowseBtn: TSpeedButton
- Left = 66
- Top = 1
- Width = 66
- Height = 45
- Hint = 'Browse and edit orders'
- Caption = '&Browse'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 0400000000000000000000000000000000000000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 33333333EEEE33370000000000000003FFFF3337FFFFFFFFFFFFFF0333333337
- FFFFFFFFFFFFFF03CCCC3707FFFFFFFFFFFFFF03FFFF37F7FF4444444444FF03
- 333337F7FFFFFFFFFFFFFF03CCCC37F7FF4444444444FF03FFFF37F7FFFFFFFF
- FFFFFF03FFFF37F7FFFFFFFFFFFFFF03FFFF37F7FF4444FF4444FF03FFFF37F7
- FFFFFFFFFFFFFF03FFFF37F7FF4444FF4444FF03FFFF37F7FFFFFFFFFFFFFF03
- FFEE37F7FF4444FF4444FF03091037F7FFFFFFFFFFFFFF0365F037F777777777
- 7777777365F037FFFFFFFFFFFFF0333365F03777777777777777333365F03333
- 333333333333333365F0}
- Layout = blGlyphTop
- Spacing = 0
- OnClick = BrowseCustOrd
- end
- object PartsBtn: TSpeedButton
- Left = 131
- Top = 1
- Width = 66
- Height = 45
- Hint = 'Browse and edit inventory'
- Caption = 'P&arts'
- Glyph.Data = {
- 2A010000424D2A010000000000007600000028000000130000000F0000000100
- 0400000000000000000000000000000000000000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 33000333300033333333333336EEE03030003337000000000E60073730003330
- E6EEEEEEEE03333330003337000000000E600737300033333333333376EEE030
- 3000333333333333370007373000333333333333333333333000333333333336
- 5550333330003700000000056007333330003056555555550333333330003700
- 0000000560073333300033333333337655503333300033333333333700073333
- 3000333333333333333333333000}
- Layout = blGlyphTop
- Spacing = 3
- OnClick = BrowseParts
- end
- object ReportBtn: TSpeedButton
- Left = 196
- Top = 1
- Width = 66
- Height = 45
- Hint = 'Print custom reports'
- Caption = '&Reports'
- Glyph.Data = {
- 7E010000424D7E01000000000000760000002800000014000000160000000100
- 0400000000000000000000000000000000000000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333309103333300000000000033365F03333008EFEFEFEFE033365F03330
- E00444E4444F000365F0330EF08EFEFEFEFE080365F03000004444E4444F0803
- 65F030FEFEFEFEFEFEFE080365F030E4444444E4444F080365F030FEFEFEFEFE
- FEFE080366C030E4444444E4444F0803000030FEFEFEFEFEFEFE0803888830E4
- 444444E4444F0803076F30FEFEFEFEFEFEFE0803888030EFEFEFEFEFEFEF0803
- 321930FEF44444444EFE0803008830EFEFEFEFEFEFEF08030EEE30F444FEFEF4
- 444E08032A2030EFEFEFEFEFEFEF0803646430000000000000000E0304083330
- EFEFEFEFEFEFEF03990033300000000000000003000033333333333333333333
- 0000}
- Layout = blGlyphTop
- Spacing = 0
- OnClick = ReportBtnClick
- end
- object HelpBtn: TSpeedButton
- Left = 261
- Top = 1
- Width = 66
- Height = 45
- Hint = 'View technical help about the application'
- Caption = '&Help'
- Glyph.Data = {
- BE060000424DBE06000000000000360400002800000024000000120000000100
- 0800000000008802000000000000000000000000000000000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000C0DCC000F0C8
- A400000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
- 03030606030303030303030303030303030303FFFF0303030303030303030303
- 0303030303060404060303030303030303030303030303F8F8FF030303030303
- 030303030303030303FE06060403030303030303030303030303F8FF03F8FF03
- 0303030303030303030303030303FE060603030303030303030303030303F8FF
- FFF8FF0303030303030303030303030303030303030303030303030303030303
- 030303F8F8030303030303030303030303030303030304040603030303030303
- 0303030303030303FFFF03030303030303030303030303030306060604030303
- 0303030303030303030303F8F8F8FF0303030303030303030303030303FE0606
- 0403030303030303030303030303F8FF03F8FF03030303030303030303030303
- 03FE06060604030303030303030303030303F8FF03F8FF030303030303030303
- 030303030303FE060606040303030303030303030303F8FF0303F8FF03030303
- 0303030303030303030303FE060606040303030303030303030303F8FF0303F8
- FF030303030303030303030404030303FE060606040303030303030303FF0303
- F8FF0303F8FF030303030303030306060604030303FE06060403030303030303
- F8F8FF0303F8FF0303F8FF03030303030303FE06060604040406060604030303
- 030303F8FF03F8FFFFFFF80303F8FF0303030303030303FE0606060606060606
- 06030303030303F8FF0303F8F8F8030303F8FF030303030303030303FEFE0606
- 060606060303030303030303F8FFFF030303030303F803030303030303030303
- 0303FEFEFEFEFE03030303030303030303F8F8FFFFFFFFFFF803030303030303
- 0303030303030303030303030303030303030303030303F8F8F8F8F803030303
- 0303}
- Layout = blGlyphTop
- NumGlyphs = 2
- Spacing = 0
- OnClick = HelpBtnClick
- end
- object CloseBtn: TSpeedButton
- Left = 326
- Top = 1
- Width = 66
- Height = 45
- Hint = 'Close the application'
- Caption = 'Cl&ose'
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000028000000140000000100
- 0400000000009001000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777777
- 777777773FFFFFFFFFFFF333333F888888888888F7F7F7888888888888883333
- 33888888888888877F7F788888888888888F333FF88844444400888FFF444444
- 88888888888333888883333334D5007FFF433333333338F888F3338F33333333
- 345D50FFFF4333333333388788F3338F3333333334D5D0FFFF433333333338F8
- 78F3338F33333333345D50FEFE4333333333388788F3338F3333333334D5D0FF
- FF433333333338F878F3338F33333333345D50FEFE4333333333388788F3338F
- 3333333334D5D0FFFF433333333338F878F3338F33333333345D50FEFE433333
- 3333388788F3338F3333333334D5D0EFEF433333333338F878F3338F33333333
- 345D50FEFE4333333333388788F3338F3333333334D5D0EFEF433333333338F8
- F8FFFF8F33333333344444444443333333333888888888833333333333333333
- 3333333333333333FFFFFF333333333333300000033333333333333888888F33
- 333333333330AAAA0333333333333338FFFF8F33333333333330000003333333
- 33333338888883333333}
- Layout = blGlyphTop
- NumGlyphs = 2
- Spacing = 0
- OnClick = CloseApp
- end
- end
- object MainMenu: TMainMenu
- Left = 36
- Top = 52
- object FileMenu: TMenuItem
- Caption = '&File'
- ShortCut = 0
- object FileNewOrder: TMenuItem
- Caption = '&New Order...'
- ShortCut = 0
- OnClick = NewOrder
- end
- object N5: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object FilePrintReport: TMenuItem
- Caption = 'Print &Report'
- ShortCut = 0
- object PrintCustList: TMenuItem
- Caption = '&Customer List'
- ShortCut = 0
- OnClick = CustomerReport
- end
- object PrintOrders: TMenuItem
- Caption = '&Order History...'
- ShortCut = 0
- OnClick = OrderReport
- end
- object PrintInvoice: TMenuItem
- Caption = '&Invoice'
- ShortCut = 0
- OnClick = InvoiceReport
- end
- end
- object FilePrinterSetup: TMenuItem
- Caption = 'Printer Setup...'
- ShortCut = 0
- OnClick = PrinterSetupClick
- end
- object N4: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object FileExit: TMenuItem
- Caption = 'E&xit'
- ShortCut = 0
- OnClick = CloseApp
- end
- end
- object ViewMenu: TMenuItem
- Caption = '&View'
- ShortCut = 0
- OnClick = ViewMenuClick
- object ViewOrders: TMenuItem
- Caption = '&Orders...'
- ShortCut = 0
- OnClick = BrowseCustOrd
- end
- object ViewPartsInventory: TMenuItem
- Caption = '&Parts/Inventory...'
- ShortCut = 0
- OnClick = BrowseParts
- end
- object N7: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object ViewStayOnTop: TMenuItem
- Caption = '&Stay On Top'
- ShortCut = 0
- OnClick = ToggleStayonTop
- end
- object N1: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object ViewLocal: TMenuItem
- Caption = '&Local Data (Paradox Data)'
- Checked = True
- GroupIndex = 1
- RadioItem = True
- ShortCut = 0
- OnClick = ViewLocalClick
- end
- object ViewRemote: TMenuItem
- Caption = '&Remote Data (Local Interbase) '
- GroupIndex = 1
- RadioItem = True
- ShortCut = 0
- OnClick = ViewRemoteClick
- end
- end
- object HelpMenu: TMenuItem
- Caption = '&Help'
- ShortCut = 0
- object HelpContents: TMenuItem
- Caption = '&Contents'
- ShortCut = 0
- OnClick = HelpBtnClick
- end
- object N6: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object HelpAbout: TMenuItem
- Caption = '&About...'
- ShortCut = 0
- OnClick = AboutClick
- end
- end
- end
- object Report: TReport
- Left = 64
- Top = 52
- end
- object PrinterSetup: TPrinterSetupDialog
- Left = 91
- Top = 52
- end
- end
-