home *** CD-ROM | disk | FTP | other *** search
- object MdrwApp: TMdrwApp
- Left = 154
- Top = 131
- Width = 620
- Height = 366
- ActiveControl = SpeedBar
- Caption = 'Modem Doctor for Win95/98'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- Menu = MainMenu
- Position = poScreenCenter
- ShowHint = True
- OnActivate = ShowWelcome
- OnClick = CheckFocus
- OnClose = GotoExit
- OnCreate = FormCreate
- OnDeactivate = CleanUp
- PixelsPerInch = 96
- TextHeight = 13
- object StatusLine: TStatusBar
- Left = 0
- Top = 297
- Width = 612
- Height = 23
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Panels = <
- item
- Text = 'Shareware Version'
- Width = 150
- end
- item
- Width = 50
- end>
- ParentFont = False
- SimplePanel = False
- end
- object SpeedBar: TPanel
- Left = 0
- Top = 0
- Width = 612
- Height = 57
- Align = alTop
- TabOrder = 0
- OnClick = CheckFocus
- object SpeedButton1: TSpeedButton
- Left = 494
- Top = 28
- Width = 25
- Height = 25
- Hint = 'Help Contents|'
- Glyph.Data = {
- 96090000424D9609000000000000360000002800000028000000140000000100
- 1800000000006009000000000000000000000000000000000000008080008080
- 0080800080800080800080800080800080800080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080008080008080008080008080008080FFFFFFFFFFFF008080008080008080
- 0080800080800080800080800080800080800080800080800080800080800080
- 8000808000808000808080800080800000808000808000808000808000808000
- 8080008080008080008080008080008080008080008080008080008080008080
- 008080008080808080808080008080FFFFFF0080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000808000808080
- 8000800000800000808000008080008080008080008080008080008080008080
- 008080008080008080008080008080008080008080008080008080808080FFFF
- FF008080808080FFFFFF00808000808000808000808000808000808000808000
- 8080008080008080008080008080008080008080008080FFFF00808000808000
- 8000000080800080800080800080800080800080800080800080800080800080
- 80008080008080008080008080008080008080808080008080FFFFFF80808000
- 8080008080008080008080008080008080008080008080008080008080008080
- 008080008080008080008080008080008080FFFF008080008080000080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080008080008080008080008080808080808080008080008080008080008080
- 0080800080800080800080800080800080800080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080008080008080008080008080008080008080008080008080008080008080
- 008080008080008080FFFFFFFFFFFF0080800080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080800000800000808000008080008080008080008080008080008080008080
- 0080800080800080800080800080800080800080800080800080800080808080
- 80808080008080FFFFFF00808000808000808000808000808000808000808000
- 8080008080008080008080008080008080008080008080808000808000808000
- 8000000080800080800080800080800080800080800080800080800080800080
- 80008080008080008080008080008080008080808080FFFFFF008080808080FF
- FFFF008080008080008080008080008080008080008080008080008080008080
- 008080008080008080008080008080FFFF008080008080008000000080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080008080008080008080808080FFFFFF008080808080008080FFFFFF008080
- 0080800080800080800080800080800080800080800080800080800080800080
- 80008080008080FFFF0080800080800080800080000000808000808000808000
- 8080008080008080008080008080008080008080008080008080008080008080
- 008080808080008080FFFFFF008080808080008080FFFFFF0080800080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080FFFF00808000808000808000800000008080008080008080008080008080
- 0080800080800080800080800080800080800080800080800080800080808080
- 80008080FFFFFF008080808080008080FFFFFF00808000808000808000808000
- 8080008080008080008080008080008080008080008080008080008080FFFF00
- 8080008080008080008000000080800080800080800080800080800080800080
- 80008080008080008080008080008080FFFFFFFFFFFF008080808080008080FF
- FFFF008080808080008080FFFFFF008080008080008080008080008080008080
- 008080008080008080800000800000008080008080008080FFFF008080008080
- 0080800080000000808000808000808000808000808000808000808000808000
- 8080008080808080808080008080FFFFFF008080808080008080FFFFFF008080
- 808080FFFFFF0080800080800080800080800080800080800080800080808080
- 00808000808000800000008080008080008080FFFF0080800080800080000000
- 8080008080008080008080008080008080008080008080008080808080FFFFFF
- 008080808080008080FFFFFFFFFFFF808080008080008080808080FFFFFF0080
- 80008080008080008080008080008080008080008080FFFF0080800080800080
- 8000800000800000800000808000808000808000800000008080008080008080
- 008080008080008080008080008080008080808080008080FFFFFF0080808080
- 80808080808080008080008080008080808080FFFFFF00808000808000808000
- 8080008080008080008080008080008080FFFF00808000808000808000808000
- 8080008080008080008080008080000080800080800080800080800080800080
- 80008080008080008080008080808080008080FFFFFFFFFFFF00808000808000
- 8080008080008080808080008080008080008080008080008080008080008080
- 008080008080008080008080FFFF00FFFF008080008080008080008080008080
- 0080800000808000808000808000808000808000808000808000808000808000
- 8080008080008080808080808080008080FFFFFFFFFFFFFFFFFFFFFFFF808080
- 0080800080800080800080800080800080800080800080800080800080800080
- 80008080008080008080FFFF00FFFF00FFFF00FFFF00FFFF0000808000808000
- 8080008080008080008080008080008080008080008080008080008080008080
- 0080800080808080808080808080808080808080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080008080008080008080008080008080008080008080008080008080008080
- 0080800080800080800080800080800080800080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080008080008080008080008080008080008080008080008080008080008080
- 0080800080800080800080800080800080800080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080008080008080008080008080008080008080008080008080}
- NumGlyphs = 2
- OnClick = HelpContents
- end
- object CmSetup: TSpeedButton
- Left = 96
- Top = 4
- Width = 25
- Height = 25
- Hint = 'Use to Change Ports or Baud Rate'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888888800008888888888888888888800008888888888888888888800008888
- 8888888888888888000088888888000008888888000088888880000000888888
- 0000888888000888000888880000888888008888800888880000888888888888
- 0008888800008888888880000088888800008888888000000888888800008888
- 8800008888888888000088888800888880088888000088888800088800088888
- 0000888888800000008888880000888888880000088888880000888888888888
- 8888888800008888888888888888888800008888888888888888888800008888
- 88888888888888880000}
- OnClick = SetupTesting
- end
- object CmDriver: TSpeedButton
- Left = 96
- Top = 28
- Width = 25
- Height = 25
- Hint = 'View Info on the Modem Driver'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888877
- 7777777700008888888880000000000000008887777770EEEEEEEEE000008800
- 000000E909099090000080F8888880E909099090000080F8888880EEEEEEEEE0
- 000080F88888800000000000000080F88800008808888888000080F888800088
- 08888888000080F88800008808888888000080F88000808807888888000080F8
- 0008888807888888000080F88088888807888888000080F88888888807888888
- 000080F88888888807888888000080000000FFFF08888888000080004C4C4000
- 8888888800008C4C4C0C888888888888000088C4CC0888888888888800008888
- 88888888888888880000}
- OnClick = DisplayDriver
- end
- object CmAuto: TSpeedButton
- Left = 408
- Top = 4
- Width = 25
- Height = 25
- Hint = 'Use to Find Hardware'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0088888888BFBF
- BFBFBFBF000088888888FFFFFFFFFFFF000088888888BFBFBFBFBFBF00008888
- 8888FFFFFFFFFFFF0B0088888888BFBFBFBFBFBF000088888888FFFFFFFFFFFF
- 000088888880BFBFBFBFBFBF0000888888010FFFFFFFFFFF0B008888880170BF
- BFBFBFBF000088888801170FFFFFFFFF0000888880711190BFBFBFBF00008888
- 808819990FFFFFFF0B008888088FF999908888880000888088FFFF0008888888
- 000088088FFF00888888888800008088FFF08888888888880B00088FFF098888
- 88888888000008FFF098888888888888000080FF088888888888888800008800
- 88888888888888880B00}
- OnClick = AutoFind
- end
- object CmUart: TSpeedButton
- Left = 434
- Top = 4
- Width = 25
- Height = 25
- Hint = 'View Uart Status'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888888800008888888888888888888800008888880000000088888800008888
- FF00000000FF888800008888880000000088888800008888FF000FF000FF8888
- 000088888800F00F0088888800008888FF00F00F00FF8888000088888800F00F
- 0088888800008888FF00F00F00FF8888000088888800F00F0088888800008888
- FF00F00F00FF8888000088888800F00F0088888800008888FF00F00F00FF8888
- 00008888880000000088888800008888FF00000000FF88880000888888000000
- 0088888800008888888888888888888800008888888888888888888800008888
- 88888888888888880000}
- OnClick = DisplayUart
- end
- object CmRts: TSpeedButton
- Left = 460
- Top = 4
- Width = 25
- Height = 25
- Hint = 'Static Handshake Tests'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 888888880000888888888888880000880000888888888888880F80F800008888
- 88888888880F80F80000888888888FFFF80F80F80000888888888000F80F8008
- 0000888888FFFF80F80F88880000888888000080F80F888800008888880F8080
- F80F888800008888880F8080F80F8888000088FFF80F8080F80F888800008000
- F80F80800008888800008880F80F88888888888800008880F80F888888888888
- 00008880F80F88888888888800008880F80F88888888888800008880F80F8888
- 8888888800008880000888888888888800008888888888888888888800008888
- 88888888888888880000}
- OnClick = RtsEchoClicked
- end
- object CmCarrier: TSpeedButton
- Left = 408
- Top = 28
- Width = 25
- Height = 25
- Hint = 'Run Carrier Tests'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888888800008888888888888888888800008888888008888888888800008888
- 8809908888888888000088888899990888888888000088888908990888888888
- 0000888889088908888888880000888889088908888888880000888889088908
- 8888888800008888890889088888888800008888890889088808888800008888
- 8888890889088888000088888888890889088888000088888888890889088888
- 0000888888888908890888880000888888888990098888880000888888888999
- 9888888800008888888888998888888800008888888888888888888800008888
- 88888888888888880000}
- OnClick = CarrierStart
- end
- object CmAnalog: TSpeedButton
- Left = 434
- Top = 28
- Width = 25
- Height = 25
- Hint = 'Run Analog Tests'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888800
- 00888888000088888888F22222088888000088888888F208F208888800008888
- 8888F208F2088888000088888888F208F2088888000088888888F208F2088888
- 000088888888F208F2088888000088000008F208F2000008000082222208F208
- F222228800008FFFF208F208FFFFFF8800008888F208F2088888888800008888
- F208F2088888888800008888F208F2088888888800008888F208F20888888888
- 00008888F208F2088888888800008888F208F2088888888800008888F208F208
- 8888888800008888F20002088888888800008888F22222888888888800008888
- 88888888888888880000}
- OnClick = LoopBackStart
- end
- object CmFax: TSpeedButton
- Left = 460
- Top = 28
- Width = 25
- Height = 25
- Hint = 'Display Fax information'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888888800008888888888888888888800008888888888888888888800008888
- 8888888888888888000088888888888888888888000088FF88888FFFF8FF8F88
- 0000880F888880000F0F80F80000880F88880F880F0F80F80000880F88880F88
- 088008880000880FFF88800008800F880000880000888FFF080F80F80000880F
- 88888000880880880000880F88888888888888880000880F8888888888888888
- 0000880000088888888888880000888888888888888888880000888888888888
- 8888888800008888888888888888888800008888888888888888888800008888
- 88888888888888880000}
- OnClick = DoFaxTest
- end
- object CmInteractive: TSpeedButton
- Left = 494
- Top = 4
- Width = 25
- Height = 25
- Hint = 'Interactive Mode'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888888800008888888888888888888800008888888888888888888800008888
- 888FFFFFFF888888000088888800000000888888000088888800000000888888
- 000088888888800F88888888000088888888800F88888888000088888888800F
- 88888888000088888888800F88888888000088888888800F8888888800008888
- 8888800F88888888000088888888800F8888888800008888888FF00FFF888888
- 0000888888000000008888880000888888000000008888880000888888888888
- 8888888800008888888888888888888800008888888888888888888800008888
- 88888888888888880000}
- OnClick = InterActiveMode
- end
- object RegistryGadget: TMemo
- Left = 128
- Top = 32
- Width = 265
- Height = 17
- Hint = 'Modem Model'
- Alignment = taCenter
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 0
- WordWrap = False
- OnClick = SpeedFocus
- end
- end
- object PortGadget: TMemo
- Left = 8
- Top = 8
- Width = 81
- Height = 17
- Hint = 'Holds name of Port under test'
- Alignment = taCenter
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 2
- OnClick = SpeedFocus
- end
- object SpeedGadget: TMemo
- Left = 8
- Top = 32
- Width = 81
- Height = 17
- Hint = 'Baud Rate in use for testing'
- Alignment = taCenter
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 4
- OnClick = SpeedFocus
- end
- object DriverGadget: TMemo
- Left = 128
- Top = 8
- Width = 265
- Height = 17
- Hint = 'Modem Manufacturer '
- Alignment = taCenter
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 3
- OnClick = SpeedFocus
- end
- object MainMenu: TMainMenu
- Left = 220
- Top = 64
- object Login1: TMenuItem
- Caption = '&Login'
- Hint = 'Use to Find Hardware'
- object AutoLogin1: TMenuItem
- Caption = '&Auto Login'
- Hint = 'Use to Find Ports for Testing'
- OnClick = AutoLogin1Click
- end
- object ManualLogin1: TMenuItem
- Caption = 'Manual &Login'
- Hint = 'Setup your Serial Port'
- OnClick = ManualLogin1Click
- end
- object ConfigModem1: TMenuItem
- Caption = 'Config &Modem'
- Hint = 'Configure TAPI Modem Settings'
- OnClick = ConfigModem1Click
- end
- object ConfigNetwork1: TMenuItem
- Caption = 'Config &Internet'
- Hint = 'Configure Dialup Network'
- OnClick = NeworkClicked
- end
- object ConfigDialup1: TMenuItem
- Caption = 'Config &Dialup'
- OnClick = ConfigDialupClicked
- end
- object HelpwithLogin1: TMenuItem
- Caption = '&Help with Login'
- Hint = 'Help with Config and Login Selections'
- OnClick = LoginHelp
- end
- end
- object Registers1: TMenuItem
- Caption = '&Registers'
- Hint = 'Check/ Test Control Registers'
- object QuickRegisterTests1: TMenuItem
- Caption = '&Quick Register Tests'
- Hint = 'Test Uart Interface for Errors'
- OnClick = DisplayUart
- end
- object D1: TMenuItem
- Caption = '&RTS/CTS DTR/DSR Echo'
- Hint = 'Drop and Raise Control Lines'
- OnClick = RtsEchoClicked
- end
- object DynamicRTSCTSHandshake1: TMenuItem
- Caption = 'D&ynamic RTS/CTS Handshake'
- Hint = 'Check Modem Handshaking'
- OnClick = DynamicRTSCTSHandshake1Click
- end
- object DynamicXonXoff1: TMenuItem
- Caption = 'Dynamic &Xon/Xoff'
- Hint = 'Check Modem Software Handshaking'
- OnClick = DynamicXonXoff1Click
- end
- end
- object CarrierTests1: TMenuItem
- Caption = '&Carrier Tests'
- Hint = 'Simulate online connection for testing'
- object CarrierTests2: TMenuItem
- Caption = '&Carrier Tests'
- Hint = 'Perform a Self test of the Modem'
- OnClick = CarrierStart
- end
- object SelectModemDriver1: TMenuItem
- Caption = '&View Modem Driver'
- Hint = 'View Info on your Windows Modem Driver'
- OnClick = DisplayDriver
- end
- end
- object LoopbackTests1: TMenuItem
- Caption = '&Loopback Tests'
- Hint = 'Test cable/uart transmissions'
- object LoopbackTest1: TMenuItem
- Caption = '&Loopback Test'
- Hint = 'Send data to a loopback plug'
- OnClick = LoopBackStart
- end
- end
- object Options1: TMenuItem
- Caption = '&Options'
- Hint = 'Use to view settings, setup modem, view stats and more'
- object InteractiveTerminal1: TMenuItem
- Caption = '&Interactive Terminal'
- Hint = 'Activate Built-in ASCII Terminal'
- OnClick = InteractiveTerminal1Click
- end
- object FaxModemInfo1: TMenuItem
- Caption = '&Fax Modem Info'
- Hint = 'Get info on your fax modem'
- OnClick = DoFaxTest
- end
- object ViewStats1: TMenuItem
- Caption = '&View Statistics'
- Hint = 'View Current Test Statistics'
- OnClick = ShowStats
- end
- object GenerateHardwareReport1: TMenuItem
- Caption = '&Generate Hardware Report'
- Hint = 'Generate a hardware report'
- OnClick = GenerateHardwareReport1Click
- end
- end
- object Setup1: TMenuItem
- Caption = '&Setup'
- Hint = 'Setup modem for testing'
- object SetupModem1: TMenuItem
- Caption = '&Setup Modem'
- Hint = 'Select /Setup Modem for testing'
- OnClick = SetupTesting
- end
- end
- object Exit1: TMenuItem
- Caption = '&Exit'
- Hint = 'Quit Modem Doctor for Win95'
- OnClick = Exit1Click
- end
- object HelpMenu: TMenuItem
- Caption = '&Help'
- object HelpContentsItem: TMenuItem
- Caption = '&Contents'
- Hint = 'Display the help contents screen'
- OnClick = HelpContents
- end
- object HelpHowToUseItem: TMenuItem
- Caption = '&Using Help'
- Hint = 'Help on using the help system'
- OnClick = HelpHowToUse
- end
- object N3: TMenuItem
- Caption = '-'
- end
- object AboutMdrw1: TMenuItem
- Caption = '&About...'
- Hint = 'About Modem Doctor'
- OnClick = HelpAbout
- end
- object OrderForm1: TMenuItem
- Caption = '&Order Form'
- OnClick = ShowOrderForm
- end
- end
- object Info1: TMenuItem
- Caption = '&Info'
- object AbouttheAuthor1: TMenuItem
- Caption = '&About the Author'
- Hint = 'About the Author'
- OnClick = ShowAuthor
- end
- object BBSSupport1: TMenuItem
- Caption = '&BBS Support'
- OnClick = ShowBBS
- end
- object InternetSupport1: TMenuItem
- Caption = '&Internet Support'
- Hint = 'Display Internet Support'
- OnClick = ShowInternet
- end
- object OrderForm2: TMenuItem
- Caption = '&Order Form'
- Hint = 'Display Order Information'
- OnClick = ShowOrderForm
- end
- object VoiceMail1: TMenuItem
- Caption = '&Voice Mail'
- Hint = 'Show Contact Information'
- OnClick = ShowVoiceMail
- end
- end
- end
- object UartEngine: TZComm
- Port = 'COM2'
- EnableParity = False
- XOuputFlowCtl = False
- XInputFlowCtl = False
- DiscardNULL = True
- ErrorChar = '~'
- Version = '1.0.1'
- OnDataAvailable = rcchar
- Left = 136
- Top = 96
- end
- end
-