home *** CD-ROM | disk | FTP | other *** search
- object CallDlg: TCallDlg
- Left = 276
- Top = 245
- BorderStyle = bsDialog
- Caption = 'Dial'
- ClientHeight = 105
- ClientWidth = 258
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- Position = poScreenCenter
- ShowHint = True
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 16
- object Label1: TLabel
- Left = 8
- Top = 5
- Width = 93
- Height = 16
- Caption = 'Number To Dial:'
- end
- object DialBtn: TBitBtn
- Left = 92
- Top = 48
- Width = 73
- Height = 27
- Hint = 'Click Here To Cancel Dialing'
- Caption = '&Cancel'
- TabOrder = 1
- Visible = False
- OnClick = DialBtnClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
- 33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
- 993337777F777F3377F3393999707333993337F77737333337FF993399933333
- 399377F3777FF333377F993339903333399377F33737FF33377F993333707333
- 399377F333377FF3377F993333101933399377F333777FFF377F993333000993
- 399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
- 99333773FF777F777733339993707339933333773FF7FFF77333333999999999
- 3333333777333777333333333999993333333333377777333333}
- NumGlyphs = 2
- end
- object CancelBtn: TBitBtn
- Left = 92
- Top = 48
- Width = 73
- Height = 27
- Hint = 'Click Here To Dial The Selected Number'
- Caption = '&Dial'
- TabOrder = 0
- OnClick = CancelBtnClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003B3000000000
- 003B37F77777777777F73BB09111111110BB3777F3F3F3F3F777311098080808
- 10B33777F7373737377313309999999910337F373F3F3F3F3733133309808089
- 03337F3373737373733313333099999033337FFFF7FFFFF7FFFFB011B0000000
- BBBB7777777777777777B01110BBBBB0BBBB77F37777777777773011108BB333
- 333337F337377F3FFFF33099111BB3010033373F33777F77773F331999100101
- 11033373FFF77773337F33300099991999033337773FFFF33373333BB7100199
- 113333377377773FF7F333BB333BB7011B33337733377F7777FF3BB3333BB333
- 3BB3377333377F33377FBB33333BB33333BB7733333773333377}
- NumGlyphs = 2
- end
- object Panel2: TPanel
- Left = 0
- Top = 86
- Width = 258
- Height = 19
- Align = alBottom
- BevelInner = bvLowered
- TabOrder = 2
- object Label2: TLabel
- Left = 2
- Top = 2
- Width = 254
- Height = 15
- Align = alClient
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- end
- object Edit1: TEdit
- Left = 8
- Top = 21
- Width = 241
- Height = 24
- Hint = 'Phone Number to Dial - can be modified'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- end
- object CloseBtn: TBitBtn
- Left = 172
- Top = 48
- Width = 77
- Height = 27
- Hint = 'Click here to Close the Dial dialog box'
- Caption = 'C&lose'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- OnClick = CloseBtnClick
- Kind = bkOK
- Margin = 2
- Spacing = -1
- end
- object Timer2: TTimer
- Enabled = False
- OnTimer = Timer2Timer
- Left = 112
- Top = 65528
- end
- object ApdComPort1: TApdComPort
- ComNumber = 1
- TraceName = 'APD.TRC'
- LogName = 'APD.LOG'
- Left = 144
- Top = 65528
- end
- object ApdModem1: TApdModem
- ComPort = ApdComPort1
- InitCmd = 'ATZ^M'
- DialCmd = 'ATDT'
- DialTerm = '^M'
- DialCancel = '^M'
- HangupCmd = '+++~~~ATH0^M'
- ConfigCmd = 'ATE1Q0X1V1^M'
- AnswerCmd = 'ATA^M'
- OkMsg = 'OK'
- ConnectMsg = 'CONNECT'
- BusyMsg = 'BUSY'
- VoiceMsg = 'VOICE'
- NoCarrierMsg = 'NO CARRIER'
- NoDialToneMsg = 'NO DIALTONE'
- ErrorMsg = 'ERROR'
- RingMsg = 'RING'
- LockDTE = True
- Left = 176
- Top = 65528
- end
- object ApdModemDialer1: TApdModemDialer
- Modem = ApdModem1
- MaxDialTries = 99
- RetrySecs = 2
- DialerOptions = [mdAbortOnNoDialtone, mdAbortOnError]
- OnRetryEnd = ApdModemDialer1RetryEnd
- OnDialStart = ApdModemDialer1DialStart
- OnConnect = ApdModemDialer1Connect
- OnBusy = ApdModemDialer1Busy
- OnVoice = ApdModemDialer1Voice
- OnError = ApdModemDialer1Error
- OnNoDialTone = ApdModemDialer1NoDialTone
- OnTooManyTries = ApdModemDialer1TooManyTries
- Left = 208
- Top = 65528
- end
- end
-