home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 1999 July
/
PCWorld_1999-07_cd.bin
/
software
/
Servis
/
Mailchk
/
MAILCHK.EXE
/
0
/
RCDATA
/
TERRORBOX
/
TERRORBOX.txt
Wrap
Text File
|
1997-10-19
|
4KB
|
190 lines
object errorbox: Terrorbox
Left = 198
Top = 127
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Mail Checker Error'
ClientHeight = 279
ClientWidth = 477
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
Position = poScreenCenter
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 5
Top = 12
Width = 215
Height = 13
Caption = 'Mail checker has detected the following error:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object errormsg: TLabel
Left = 21
Top = 28
Width = 196
Height = 57
AutoSize = False
Caption = '[error message]'
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label3: TLabel
Left = 5
Top = 88
Width = 155
Height = 13
Caption = 'Possible causes for this error are:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 252
Top = 12
Width = 214
Height = 39
Caption =
'If no causes are listed, or you couln'#39't get mail checker to work' +
', please fill in this form to report the error.'
WordWrap = True
end
object Bevel1: TBevel
Left = 232
Top = 8
Width = 9
Height = 265
Shape = bsLeftLine
end
object Label2: TLabel
Left = 252
Top = 57
Width = 214
Height = 28
Caption =
'If the form does not work correctly, contact me at alon.a@usa.ne' +
't'
WordWrap = True
end
object Label7: TLabel
Left = 6
Top = 215
Width = 216
Height = 13
Caption = 'If the error persists, please select Report error.'
end
object causes: TMemo
Left = 17
Top = 104
Width = 200
Height = 101
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
object expandbtn: TButton
Left = 128
Top = 238
Width = 92
Height = 25
Caption = '&Report error >>'
TabOrder = 1
OnClick = expandbtnClick
end
object sendrep: TBitBtn
Left = 368
Top = 248
Width = 100
Height = 25
Caption = 'Send Report'
TabOrder = 2
OnClick = sendrepClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333FFFFFFFFFFFFFFF000000000000
000077777777777777770FFFFFFFFFFFFFF07F3333FFF33333370FFFF777FFFF
FFF07F333777333333370FFFFFFFFFFFFFF07F3333FFFFFF33370FFFF777777F
FFF07F33377777733FF70FFFFFFFFFFF99907F3FFF33333377770F777FFFFFFF
9CA07F77733333337F370FFFFFFFFFFF9A907FFFFFFFFFFF7FF7000000000000
0000777777777777777733333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
33333333333333333333333333333333333333333333333333330000}
NumGlyphs = 2
end
object Panel1: TPanel
Left = 248
Top = 96
Width = 217
Height = 141
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 3
object Label5: TLabel
Left = 9
Top = 8
Width = 96
Height = 13
Caption = 'Your E-mail address:'
end
object Label6: TLabel
Left = 12
Top = 48
Width = 145
Height = 13
Caption = 'Any comments about this error:'
end
object email: TEdit
Left = 8
Top = 23
Width = 201
Height = 21
TabOrder = 0
OnChange = emailChange
end
object comments: TMemo
Left = 9
Top = 68
Width = 200
Height = 61
ScrollBars = ssVertical
TabOrder = 1
end
end
object okbtn: TBitBtn
Left = 17
Top = 237
Width = 75
Height = 25
TabOrder = 4
OnClick = okbtnClick
Kind = bkOK
end
object smtp: TTCPClient
OnError = smtpError
Host = 'mail.usa.net'
Port = '25'
Authorized = False
OnData = smtpData
Left = 94
Top = 235
end
end