home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1998 January
/
CHIPCD1_98.iso
/
software
/
testsoft
/
ntmailnt
/
mailmon.exe
/
0
/
RCDATA
/
TFORM1
/
TFORM1.txt
Wrap
Text File
|
1996-06-17
|
38KB
|
1,259 lines
object Form1: TForm1
Left = 187
Top = 191
Width = 506
Height = 396
Caption = 'NT Mail Watch'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
OnClose = FormClose
OnCreate = FormCreate
OnResize = FormResize
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object PageControl: TExtPageControl
Left = 0
Top = 57
Width = 498
Height = 293
ActivePage = TabSheet1
Align = alClient
MultiLine = True
TabOrder = 0
OnChange = PageControlChange
TabActiveColor = clBtnFace
TabActiveFont.Color = clBlue
TabActiveFont.Height = -11
TabActiveFont.Name = 'MS Sans Serif'
TabActiveFont.Style = [fsBold]
TabInactiveColor = clBtnFace
TabInactiveFont.Color = clWindowText
TabInactiveFont.Height = -11
TabInactiveFont.Name = 'MS Sans Serif'
TabInactiveFont.Style = []
object TabSheet1: TTabSheet
Caption = 'SMTP Thread'
object LogSplit1: TLogSplit
Left = 0
Top = 0
Width = 490
Height = 247
AutoUpdate = False
BarWidth = 4
SyncScroll = False
Style = oxsAuto
Align = alClient
TabOrder = 0
BarPosition = 245
Orientation = oxsVert
FillTop = False
Current = 1
MaxLines = 500
Purge = 50
object ToxScrollPane
Left = 2
Top = 2
Width = 243
Height = 243
BorderStyle = bsNone
TabOrder = 0
object LogGrid1: TLogGrid
Left = 0
Top = 0
Width = 243
Height = 243
Align = alClient
ColCount = 2
DefaultRowHeight = 16
RowCount = 128
FixedRows = 0
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect]
TabOrder = 0
ColWidths = (
64
115)
end
end
object ToxScrollPane
Left = 249
Top = 2
Width = 239
Height = 243
BorderStyle = bsNone
TabOrder = 1
object PPLabel2: TPPLabel
Left = 0
Top = 0
Width = 239
Height = 21
Align = alTop
BevelInner = bvNone
BevelOuter = bvRaised
BevelWidth = 1
BorderWidth = 1
BorderStyle = bsSingle
Caption = ' '
TabOrder = 0
Attributes.MinWidth = 30
Attributes.MaxWidth = -1
Attributes.MinHeight = 30
Attributes.MaxHeight = -1
Attributes.SizableTop = False
Attributes.SizableBottom = False
Attributes.SizableLeft = False
Attributes.SizableRight = False
Attributes.Movable = False
Attributes.MoveParent = False
Attributes.MoveColor = clActiveCaption
Attributes.HideChildren = True
Attributes.HideSiblings = False
Attributes.StayVisible = False
Attributes.TrackPositions = True
Attributes.EdgeOffset = 10
Attributes.CursorMoving = crArrow
Attributes.CursorSizingNS = crSizeNS
Attributes.CursorSizingEW = crSizeWE
Attributes.IniLog = False
Attributes.AllowRollup = False
Attributes.AllowBeeps = False
Attributes.GridAlignment = 1
object SmtpThread: TLabel
Left = 2
Top = 2
Width = 231
Height = 13
Align = alClient
Alignment = taCenter
Caption = 'Thread 1'
end
end
object SmtpThreadLog: TSRichEdit
Left = 0
Top = 21
Width = 239
Height = 222
Align = alClient
PopupMenu = SmtpThreadLog.
ScrollBars = ssBoth
TabOrder = 1
WordWrap = False
AutoColor = False
AutoScroll = True
MaxLines = 500
FillTop = False
Purge = 50
end
end
end
end
object TabSheet2: TTabSheet
Caption = 'SMTP Log'
object SmtpLog: TSRichEdit
Left = 0
Top = 0
Width = 490
Height = 247
Align = alClient
PopupMenu = SmtpLog.
ScrollBars = ssBoth
TabOrder = 0
WordWrap = False
AutoColor = True
AutoScroll = True
MaxLines = 500
FillTop = False
Purge = 50
end
end
object TabSheet3: TTabSheet
Caption = 'Post Thread'
object LogSplit2: TLogSplit
Left = 0
Top = 0
Width = 490
Height = 247
AutoUpdate = False
BarWidth = 4
SyncScroll = False
Style = oxsAuto
Align = alClient
TabOrder = 0
BarPosition = 245
Orientation = oxsVert
FillTop = False
Current = 1
MaxLines = 500
Purge = 50
object ToxScrollPane
Left = 2
Top = 2
Width = 243
Height = 243
BorderStyle = bsNone
TabOrder = 0
object LogGrid2: TLogGrid
Left = 0
Top = 0
Width = 205
Height = 243
Align = alClient
ColCount = 2
DefaultRowHeight = 16
RowCount = 128
FixedRows = 0
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect]
TabOrder = 0
ColWidths = (
64
111)
end
end
object ToxScrollPane
Left = 249
Top = 2
Width = 239
Height = 243
BorderStyle = bsNone
TabOrder = 1
object PPLabel3: TPPLabel
Left = 0
Top = 0
Width = 239
Height = 21
Align = alTop
BevelInner = bvNone
BevelOuter = bvRaised
BevelWidth = 1
BorderWidth = 1
BorderStyle = bsSingle
Caption = ' '
TabOrder = 0
Attributes.MinWidth = 30
Attributes.MaxWidth = -1
Attributes.MinHeight = 30
Attributes.MaxHeight = -1
Attributes.SizableTop = True
Attributes.SizableBottom = True
Attributes.SizableLeft = True
Attributes.SizableRight = True
Attributes.Movable = False
Attributes.MoveParent = False
Attributes.MoveColor = clActiveCaption
Attributes.HideChildren = True
Attributes.HideSiblings = False
Attributes.StayVisible = False
Attributes.TrackPositions = True
Attributes.EdgeOffset = 10
Attributes.CursorMoving = crArrow
Attributes.CursorSizingNS = crSizeNS
Attributes.CursorSizingEW = crSizeWE
Attributes.IniLog = False
Attributes.AllowRollup = False
Attributes.AllowBeeps = False
Attributes.GridAlignment = 1
object PostThread: TLabel
Left = 2
Top = 2
Width = 43
Height = 13
Align = alClient
Alignment = taCenter
Caption = 'Thread 1'
end
end
object SRichEdit2: TSRichEdit
Left = 0
Top = 21
Width = 239
Height = 222
Align = alClient
PopupMenu = SRichEdit2.
ScrollBars = ssBoth
TabOrder = 1
WordWrap = False
AutoColor = False
AutoScroll = True
MaxLines = 500
FillTop = False
Purge = 50
end
end
end
end
object TabSheet4: TTabSheet
Caption = 'Post Log'
object SRichEdit5: TSRichEdit
Left = 0
Top = 0
Width = 490
Height = 247
Align = alClient
PopupMenu = SRichEdit5.
ScrollBars = ssBoth
TabOrder = 0
WordWrap = False
AutoColor = True
AutoScroll = True
MaxLines = 500
FillTop = False
Purge = 50
end
end
object TabSheet5: TTabSheet
Caption = 'Pop Thread'
object LogSplit3: TLogSplit
Left = 0
Top = 0
Width = 490
Height = 247
AutoUpdate = False
BarWidth = 4
SyncScroll = False
Style = oxsAuto
Align = alClient
TabOrder = 0
BarPosition = 245
Orientation = oxsVert
FillTop = False
Current = 1
MaxLines = 500
Purge = 50
object ToxScrollPane
Left = 2
Top = 2
Width = 243
Height = 243
BorderStyle = bsNone
TabOrder = 0
object LogGrid3: TLogGrid
Left = 0
Top = 0
Width = 203
Height = 243
Align = alClient
ColCount = 2
DefaultRowHeight = 16
RowCount = 128
FixedRows = 0
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect]
TabOrder = 0
ColWidths = (
64
109)
end
end
object ToxScrollPane
Left = 249
Top = 2
Width = 239
Height = 243
BorderStyle = bsNone
TabOrder = 1
object PPLabel4: TPPLabel
Left = 0
Top = 0
Width = 239
Height = 21
Align = alTop
BevelInner = bvNone
BevelOuter = bvRaised
BevelWidth = 1
BorderWidth = 1
BorderStyle = bsSingle
Caption = ' '
TabOrder = 0
Attributes.MinWidth = 30
Attributes.MaxWidth = -1
Attributes.MinHeight = 30
Attributes.MaxHeight = -1
Attributes.SizableTop = True
Attributes.SizableBottom = True
Attributes.SizableLeft = True
Attributes.SizableRight = True
Attributes.Movable = False
Attributes.MoveParent = False
Attributes.MoveColor = clActiveCaption
Attributes.HideChildren = True
Attributes.HideSiblings = False
Attributes.StayVisible = False
Attributes.TrackPositions = True
Attributes.EdgeOffset = 10
Attributes.CursorMoving = crArrow
Attributes.CursorSizingNS = crSizeNS
Attributes.CursorSizingEW = crSizeWE
Attributes.IniLog = False
Attributes.AllowRollup = False
Attributes.AllowBeeps = False
Attributes.GridAlignment = 1
object PopThread: TLabel
Left = 2
Top = 2
Width = 43
Height = 13
Align = alClient
Alignment = taCenter
Caption = 'Thread 1'
end
end
object PopThreadLog: TSRichEdit
Left = 0
Top = 21
Width = 239
Height = 222
Align = alClient
PopupMenu = PopThreadLog.
ScrollBars = ssBoth
TabOrder = 1
WordWrap = False
AutoColor = False
AutoScroll = True
MaxLines = 500
FillTop = False
Purge = 50
end
end
end
end
object TabSheet6: TTabSheet
Caption = 'POP Log'
object SRichEdit6: TSRichEdit
Left = 0
Top = 0
Width = 490
Height = 247
Align = alClient
PopupMenu = SRichEdit6.
ScrollBars = ssBoth
TabOrder = 0
WordWrap = False
AutoColor = True
AutoScroll = True
MaxLines = 500
FillTop = False
Purge = 50
end
end
object TabSheet7: TTabSheet
Caption = 'Dialer Thread'
object LogSplit4: TLogSplit
Left = 0
Top = 0
Width = 490
Height = 247
AutoUpdate = False
BarWidth = 4
SyncScroll = False
Style = oxsAuto
Align = alClient
TabOrder = 0
BarPosition = 245
Orientation = oxsVert
FillTop = False
Current = 1
MaxLines = 500
Purge = 50
object ToxScrollPane
Left = 2
Top = 2
Width = 243
Height = 243
BorderStyle = bsNone
TabOrder = 0
object LogGrid4: TLogGrid
Left = 0
Top = 0
Width = 243
Height = 243
Align = alClient
ColCount = 2
DefaultRowHeight = 16
RowCount = 128
FixedRows = 0
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect]
TabOrder = 0
ColWidths = (
64
149)
end
end
object ToxScrollPane
Left = 249
Top = 2
Width = 239
Height = 243
BorderStyle = bsNone
TabOrder = 1
object PPLabel5: TPPLabel
Left = 0
Top = 0
Width = 239
Height = 21
Align = alTop
BevelInner = bvNone
BevelOuter = bvRaised
BevelWidth = 1
BorderWidth = 1
BorderStyle = bsSingle
Caption = ' '
TabOrder = 0
Attributes.MinWidth = 30
Attributes.MaxWidth = -1
Attributes.MinHeight = 30
Attributes.MaxHeight = -1
Attributes.SizableTop = True
Attributes.SizableBottom = True
Attributes.SizableLeft = True
Attributes.SizableRight = True
Attributes.Movable = False
Attributes.MoveParent = False
Attributes.MoveColor = clActiveCaption
Attributes.HideChildren = True
Attributes.HideSiblings = False
Attributes.StayVisible = False
Attributes.TrackPositions = True
Attributes.EdgeOffset = 10
Attributes.CursorMoving = crArrow
Attributes.CursorSizingNS = crSizeNS
Attributes.CursorSizingEW = crSizeWE
Attributes.IniLog = False
Attributes.AllowRollup = False
Attributes.AllowBeeps = False
Attributes.GridAlignment = 1
object DialerThread: TLabel
Left = 2
Top = 2
Width = 231
Height = 13
Align = alClient
Alignment = taCenter
Caption = 'Thread 1'
end
end
object DialerThreadLog: TSRichEdit
Left = 0
Top = 21
Width = 239
Height = 222
Align = alClient
PopupMenu = DialerThreadLog.
ScrollBars = ssBoth
TabOrder = 1
WordWrap = False
AutoColor = False
AutoScroll = True
MaxLines = 500
FillTop = False
Purge = 50
end
end
end
end
object TabSheet11: TTabSheet
Caption = 'Dialer Log'
object DialerLog: TSRichEdit
Left = 0
Top = 0
Width = 490
Height = 247
Align = alClient
PopupMenu = DialerLog.
ScrollBars = ssBoth
TabOrder = 0
WordWrap = False
AutoColor = True
AutoScroll = True
MaxLines = 500
FillTop = False
Purge = 50
end
end
object Connections: TTabSheet
Caption = 'Connections'
object ConnectBox: TSectionListBox
Left = 0
Top = 0
Width = 490
Height = 247
Align = alClient
Color = clWindow
Delimiter = ';'
Enabled = True
ExtendedSelect = True
FontList.Color = clWindowText
FontList.Height = -11
FontList.Name = 'MS Sans Serif'
FontList.Style = []
FontHeader.Color = clWindowText
FontHeader.Height = -11
FontHeader.Name = 'MS Sans Serif'
FontHeader.Style = []
ItemHeight = 16
MultiSelect = False
TabOrder = 0
Sections.Sections = (
#0'170'#0'From Host '
#0'42'#0'Socket'
#0'80'#0'Monitor Thread'
#0'38'#0'Status')
Sorted = False
end
end
object TabSheet10: TTabSheet
Caption = 'Event Log'
object EventLog: TSRichEdit
Left = 0
Top = 0
Width = 490
Height = 247
Align = alClient
PopupMenu = EventLog.
ScrollBars = ssBoth
TabOrder = 0
WordWrap = False
AutoColor = False
AutoScroll = True
MaxLines = 500
FillTop = False
Purge = 50
end
end
object TabSheet8: TTabSheet
Caption = 'Configuration'
object Panel1: TPanel
Left = 4
Top = 4
Width = 133
Height = 21
Alignment = taRightJustify
BevelOuter = bvLowered
Caption = 'Port to Monitor '
TabOrder = 0
end
object Panel2: TPanel
Left = 4
Top = 28
Width = 133
Height = 21
Alignment = taRightJustify
BevelOuter = bvLowered
Caption = 'Monitor on Startup '
TabOrder = 1
end
object Panel3: TPanel
Left = 4
Top = 52
Width = 133
Height = 21
Alignment = taRightJustify
BevelOuter = bvLowered
Caption = 'Monitor SMTP '
TabOrder = 2
end
object Panel4: TPanel
Left = 4
Top = 76
Width = 133
Height = 21
Alignment = taRightJustify
BevelOuter = bvLowered
Caption = 'Monitor Post '
TabOrder = 3
end
object Panel5: TPanel
Left = 4
Top = 100
Width = 133
Height = 21
Alignment = taRightJustify
BevelOuter = bvLowered
Caption = 'Monitor Pop '
TabOrder = 4
end
object Panel6: TPanel
Left = 4
Top = 124
Width = 133
Height = 21
Alignment = taRightJustify
BevelOuter = bvLowered
Caption = 'Monitor Dialer '
TabOrder = 5
end
object Panel7: TPanel
Left = 220
Top = 4
Width = 133
Height = 21
Alignment = taRightJustify
BevelOuter = bvLowered
Caption = 'Fill Logs from Top '
TabOrder = 6
end
object Panel8: TPanel
Left = 220
Top = 28
Width = 133
Height = 21
Alignment = taRightJustify
BevelOuter = bvLowered
Caption = 'Max Log Lines '
TabOrder = 7
end
object Panel9: TPanel
Left = 220
Top = 52
Width = 133
Height = 21
Alignment = taRightJustify
BevelOuter = bvLowered
Caption = 'ToolBar on Startup '
TabOrder = 8
end
object StartCheck: TBorCheck
Left = 140
Top = 28
Width = 17
Height = 20
TabOrder = 9
end
object SMTPCheck: TBorCheck
Left = 140
Top = 52
Width = 17
Height = 20
Caption = 'SMTPCheck'
TabOrder = 10
end
object PostCheck: TBorCheck
Left = 140
Top = 76
Width = 17
Height = 20
Caption = 'PostCheck'
TabOrder = 11
end
object PopCheck: TBorCheck
Left = 140
Top = 100
Width = 17
Height = 20
Caption = 'PopCheck'
TabOrder = 12
end
object DialCheck: TBorCheck
Left = 140
Top = 124
Width = 17
Height = 20
Caption = 'DialCheck'
TabOrder = 13
end
object FillTopCheck: TBorCheck
Left = 357
Top = 4
Width = 16
Height = 20
Caption = 'FillTopCheck'
TabOrder = 14
end
object ShowToolCheck: TBorCheck
Left = 356
Top = 52
Width = 17
Height = 20
Caption = 'ShowToolCheck'
TabOrder = 15
end
object PortNumber: TNumEdit
Left = 140
Top = 4
Width = 69
Height = 21
Decimals = 2
Digits = 12
Masks.PositiveMask = '#####'
NumericType = ntGeneral
TabOrder = 16
UseRounding = True
Validate = False
end
object Max: TNumEdit
Left = 360
Top = 28
Width = 41
Height = 21
Decimals = 0
Digits = 12
Masks.PositiveMask = '#####'
Max = 5000.000000000000000000
Min = 10.000000000000000000
NumericType = ntGeneral
TabOrder = 17
UseRounding = True
Value = 10.000000000000000000
Validate = False
end
end
end
object PPLabel1: TPPLabel
Left = 0
Top = 33
Width = 498
Height = 24
Align = alTop
BevelInner = bvNone
BevelOuter = bvRaised
BevelWidth = 1
BorderWidth = 1
BorderStyle = bsSingle
Caption = ' '
TabOrder = 1
Attributes.MinWidth = 30
Attributes.MaxWidth = -1
Attributes.MinHeight = 30
Attributes.MaxHeight = -1
Attributes.SizableTop = True
Attributes.SizableBottom = True
Attributes.SizableLeft = True
Attributes.SizableRight = True
Attributes.Movable = False
Attributes.MovableHorz = False
Attributes.MoveParent = False
Attributes.MoveColor = clActiveCaption
Attributes.HideChildren = True
Attributes.HideSiblings = False
Attributes.StayVisible = False
Attributes.TrackPositions = True
Attributes.EdgeOffset = 10
Attributes.CursorMoving = crArrow
Attributes.CursorSizingNS = crSizeNS
Attributes.CursorSizingEW = crSizeWE
Attributes.IniLog = False
Attributes.AllowRollup = False
Attributes.AllowBeeps = False
Attributes.GridAlignment = 1
object Label2: TLabel
Left = 2
Top = 2
Width = 490
Height = 16
Align = alClient
Caption = 'Label2'
end
end
object oxDockBar1: ToxDockBar
Left = 0
Top = 0
Width = 498
Height = 33
Dock = dkTop
Caption = 'oxDockBar1'
FloatHeight = 0
FloatLeft = 0
FloatTop = 0
FloatWidth = 0
Style = bsAuto
TabOrder = 2
TitleFont.Color = clCaptionText
TitleFont.Height = -9
TitleFont.Name = 'Small Fonts'
TitleFont.Style = []
object MenuButton1: TMenuButton
Left = 32
Top = 4
Width = 25
Height = 25
Hint = 'Pop Up Help'
Down = False
Enabled = True
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFF0000000FFFFFF00FFFFFFFFF0000000FFFFFF00FFFFFFFFF0000000FFFF
F00FFFF000FFF0000000F0FFF00FFFF000FFF0000000F00F00FFFFFFFFFFF000
0000F00000FFFFF00FFFF0000000F00000000FF00FFFF0000000F0000000FFFF
00FFF0000000F000000FFFFFF00FF0000000F00000FFF00FFF00F0000000F000
0FFF00FFFF00F0000000F000FFFF00FFFF00F0000000F00FFFFFF00FFF00F000
0000F0FFFFFFFF00000FF0000000FFFFFFFFFFFFFFFFF0000000FFFFFFFFFFFF
FFFFF0000000}
ParentShowHint = False
ShowHint = True
MenuItem = WhatsThis1
SyncDown = False
SyncEnabled = False
end
object MenuButton2: TMenuButton
Left = 4
Top = 4
Width = 25
Height = 25
Hint = 'Exit the Application'
Down = False
Enabled = True
Glyph.Data = {
56070000424D5607000000000000360400002800000028000000140000000100
0800000000002003000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A600000000000000000000000000000000000000000000000000000000000000
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
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030707070707
070707070707070707070707070703FFFFFFFFFFFFFFFFFFFFFFFF0303030303
03FFF8F8F8F8F8F8F8F8F8F8F8F8FF07FF07FF07F8F8F8F8F8F8F8F8F8F8F8F8
F8F8030303030303F8F8F8F8F8F8F8F8F8F8F8F8F80707FF07FF07F8F8F8F8F8
F8F8F8F8F8F8F8F8F8FF030303FFFFF8F8F80404040404040000F8F8F8FFFFFF
040404040404F8F8F8F8F8F8F8F8F8F8F8030303F8F8F8F8F803030303030304
FD05000007FFFFFF0403030303030303030303F8FFF8F8F8FF030303F8FF0303
030303030303030405FD0500FFFFFFFF0403030303030303030303F8F807F8F8
FF030303F8FF03030303030303030304FD05FD00FFFFFFFF0403030303030303
030303F8FFF807F8FF030303F8FF0303030303030303030405FD0500FFFEFFFE
0403030303030303030303F8F807F8F8FF030303F8FF03030303030303030304
FD05FD00FFFFFFFF0403030303030303030303F8FFF807F8FF030303F8FF0303
030303030303030405FD0500FFFEFFFE0403030303030303030303F8F807F8F8
FF030303F8FF03030303030303030304FD05FD00FFFFFFFF0403030303030303
030303F8FFF807F8FF030303F8FF0303030303030303030405FD0500FFFEFFFE
0403030303030303030303F8F807F8F8FF030303F8FF03030303030303030304
FD05FD00FEFFFEFF0403030303030303030303F8FFF807F8FF030303F8FF0303
030303030303030405FD0500FFFEFFFE0403030303030303030303F8F807F8F8
FF030303F8FF03030303030303030304FD05FD00FEFFFEFF0403030303030303
030303F8FFF8FFF8FFFFFFFFF8FF030303030303030303040404040404040404
0403030303030303030303F8F8F8F8F8F8F8F8F8F80303030303030303030303
03030303030303030303030303030303030303030303FFFFFFFFFFFF03030303
0303030303030303030000000000000303030303030303030303030303F8F8F8
F8F8F8FF0303030303030303030303030300FAFAFAFA00030303030303030303
0303030303F8FFFFFFFFF8FF0303030303030303030303030300000000000003
03030303030303030303030303F8F8F8F8F8F803030303030303}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
MenuItem = Exit1
SyncDown = False
SyncEnabled = False
end
object ListenOn: TMenuButton
Left = 60
Top = 4
Width = 25
Height = 25
Hint = 'Start the Monitor'
GroupIndex = 1
Down = True
Enabled = True
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
033333777777777773333330777777703333333773F333773333333330888033
33333FFFF7FFF7FFFFFF0000000000000003777777777777777F0FFFFFFFFFF9
FF037F3333333337337F0F78888888887F037F33FFFFFFFFF37F0F7000000000
8F037F3777777777F37F0F70AAAAAAA08F037F37F3333337F37F0F70ADDDDDA0
8F037F37F3333337F37F0F70A99A99A08F037F37F3333337F37F0F70A99A99A0
8F037F37F3333337F37F0F70AAAAAAA08F037F37FFFFFFF7F37F0F7000000000
8F037F3777777777337F0F77777777777F037F3333333333337F0FFFFFFFFFFF
FF037FFFFFFFFFFFFF7F000000000000000377777777777777730000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
MenuItem = MonitorOn
SyncDown = False
SyncEnabled = False
end
object ListenOff: TMenuButton
Left = 88
Top = 4
Width = 25
Height = 25
Hint = 'Stop the Monitor'
GroupIndex = 1
Down = False
Enabled = True
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
033333777777777773333330777777703333333773F333773333333330888033
33333FFFF7FFF7FFFFFF0000000000000003777777777777777F0FFFFFFFFFF9
FF037F3333333337337F0F78888888887F037F33FFFFFFFFF37F0F7000000000
8F037F3777777777F37F0F70AAAAAAA08F037F37F3333337F37F0F70ADDDDDA0
8F037F37F3333337F37F0F70A99A99A08F037F37F3333337F37F0F70A99A99A0
8F037F37F3333337F37F0F70AAAAAAA08F037F37FFFFFFF7F37F0F7000000000
8F037F3777777777337F0F77777777777F037F3333333333337F0FFFFFFFFFFF
FF037FFFFFFFFFFFFF7F000000000000000377777777777777730000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
MenuItem = MonitorOff
SyncDown = False
SyncEnabled = False
end
end
object ServerSocket1: TServerSocket
Port = '22200'
Protocol = 'tcp'
OnInfo = ServerSocket1Info
OnAccept = ServerSocket1Accept
OnDisconnect = ServerSocket1Disconnect
OnRead = ServerSocket1Read
Left = 304
Top = 68
end
object LogHandler1: TLogHandler
MaxLines = 500
Purge = 50
ListBox = ConnectBox
FillTop = False
Left = 56
Top = 40
end
object ODSHelp1: TODSHelp
HelpText.Strings = (
'About1'
'ClearAllLogs1'
'ConnectBox'
'Connections'
'DialCheck'
'DialerLog'
'DialerThread'
'DialerThreadLog'
'EventLog'
'Exit1'
'File1'
'FillTopCheck'
'FormSaver1'
'Help1'
'JustOne321'
'Label2'
'ListenOff'
'ListenOn'
'LogGrid1'
'LogGrid2'
'LogGrid3'
'LogGrid4'
'LogHandler1'
'LogSplit1'
'LogSplit2'
'LogSplit3'
'LogSplit4'
'MainMenu1'
'Max'
'MenuButton1'
'MenuButton2'
'MonitorOff'
'MonitorOn'
'ODSHelp1'
'Options1'
'oxDockBar1'
'PageControl'
'Panel1'
'Panel2'
'Panel3'
'Panel4'
'Panel5'
'Panel6'
'Panel7'
'Panel8'
'Panel9'
'PopCheck'
'PopThread'
'PopThreadLog'
'PopupMenu1'
'PortNumber'
'PostCheck'
'PostThread'
'PPLabel1'
'PPLabel2'
'PPLabel3'
'PPLabel4'
'PPLabel5'
'PrinterSetupDialog1'
'PrintSetup1'
'Reg'
'ServerSocket1'
'ShowToolCheck'
'SMTPCheck'
'SmtpLog'
'SmtpThread'
'SmtpThreadLog'
'SRichEdit2'
'SRichEdit5'
'SRichEdit6'
'StartCheck'
'TabSheet1'
'TabSheet10'
'TabSheet11'
'TabSheet2'
'TabSheet3'
'TabSheet4'
'TabSheet5'
'TabSheet6'
'TabSheet7'
'TabSheet8'
'Timer1'
'WhatsThis1')
HelpText.HelpData = {
5300010000000001000000000100000000010000000001000000000100000000
0100000000010000000001000000000100000000010000000001000000000100
0000000100000000010000000001000000000100000000010000000001000000
0001000000000100000000010000000001000000000100000000010000000001
0000000001000000000100000000010000000001000000000100000000010000
000001000015005475726E20746865204D6F6E69746F72204F66660001000000
0001000014005475726E20746865204D6F6E69746F72206F6E00010000000001
0000070141206C697374206F6620616374697665207468726561647320616E64
207468656972206F75747075742066726F6D20746865204E544D61696C20534D
5450205365727665722E2053656C656374207468652063757272656E74207468
7265616420746F206D6F6E69746F20627920636C69636B696E67207769746820
746865204C656674204D6F75736520627574746F6E206F6E2069742E20205269
67687420436C69636B207769746820746865206D6F75736520627574746F6E20
746F20636C656172207468652063757272656E74207468726561642E20536869
667420616E6420526967687420436C69636B20636C6561727320616C6C207468
6520746872656164732E00010000000001000000000100000000010000000001
0000000001000014004120506F7075702068656C206D65737361676500010000
0000010000000001000000000100000000010000000001000000000100000000
0100000000010000000001000000000100000000010000000001000000000100
0000000100000000010000000001000000000100000000010000000001000000
0001000000000100000000010000000001000000000100000000010000000001
0000000001000000000100000000010000000001000000000100000000010000
0000010000000001000000000100000000010000000001000000000100000000
0100000000010000000001000000000100000000010000000001000000000100
0000000100000000010000000001000000000100000000010000000001000000
0001000000000100000000010000000001000000000100000000010000000001
0000000001000000000100000000010000000001000000000100000000010000
0000010000000001000000000100000000010000000001000000000100000000
0100000000010000000001000000000100000000010000000001000000000100
0000000100000000010000000001000000000100000000010000000001000000
0001000000000100000000010000000001000000000100000000010000000001
0000000001000000000100000000010000000001000000000100000000010000
0000010000000001000000000100000000010000000001000000000100000000
0100000000010000000001000000000100000000010000000001000000000100
0000000100000000010000000001000000000100000000010000000001000000
0001000000000100000000010000000001000000000100000000010000000001
00000000}
Color = 15269887
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = True
MaxWidth = 300
MoreText = 'Click here or press F1 for more...'
Left = 228
Top = 40
end
object FormSaver1: TFormSaver
IniFile = 'tcpmonit'
IniSection = 'Form1'
Left = 280
Top = 44
end
object JustOne321: TJustOne32
Left = 104
Top = 36
end
object Reg: TRegFile
RootKey = hkLocalMachine
Left = 124
Top = 84
end
object MainMenu1: TMainMenu
Left = 172
Top = 173
object File1: TMenuItem
Caption = '&File'
ShortCut = 0
object PrintSetup1: TMenuItem
Caption = 'P&rint Setup'
ShortCut = 0
OnClick = PrintSetup1Click
end
object Exit1: TMenuItem
Caption = 'E&xit'
ShortCut = 0
OnClick = Exit1Click
end
end
object Options1: TMenuItem
Caption = '&Options'
ShortCut = 0
object MonitorOn: TMenuItem
Caption = '&Monitor On'
ShortCut = 0
OnClick = MonitorOnClick
end
object MonitorOff: TMenuItem
Caption = 'Monitor &Off'
Enabled = False
ShortCut = 0
OnClick = MonitorOffClick
end
object ClearAllLogs1: TMenuItem
Caption = '&Clear All Logs'
ShortCut = 0
OnClick = ClearAllLogs1Click
end
end
object Help1: TMenuItem
Caption = '&Help'
ShortCut = 0
object WhatsThis1: TMenuItem
Caption = '&Whats This'
ShortCut = 0
OnClick = WhatsThis1Click
end
object About1: TMenuItem
Caption = '&About'
ShortCut = 0
OnClick = About1Click
end
end
end
object PrinterSetupDialog1: TPrinterSetupDialog
Left = 436
Top = 16
end
object Timer1: TTimer
Enabled = False
OnTimer = Timer1Timer
Left = 184
Top = 20
end
object PopupMenu1: TPopupMenu
Left = 132
Top = 135
end
end