www.pudn.com > 2004021618574529928.rar > MainForm.dfm
object frmMain: TfrmMain
Left = 208
Top = 159
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = #26381#21153#22120
ClientHeight = 459
ClientWidth = 416
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 416
Height = 49
Align = alTop
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
object Label1: TLabel
Left = 140
Top = 20
Width = 121
Height = 12
AutoSize = False
Caption = #25216#26415#35752#35770#32676#32452#26381#21153#31243#24335
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
end
object Panel2: TPanel
Left = 0
Top = 49
Width = 201
Height = 391
Align = alLeft
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
object SSEListUser: TListBox
Left = 1
Top = 1
Width = 199
Height = 389
Align = alClient
Color = clNone
Font.Charset = ANSI_CHARSET
Font.Color = clLime
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 12
ParentFont = False
TabOrder = 0
end
end
object Panel3: TPanel
Left = 201
Top = 49
Width = 215
Height = 391
Align = alClient
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
object RELog: TRichEdit
Left = 1
Top = 1
Width = 213
Height = 389
Align = alClient
Color = clNone
Font.Charset = GB2312_CHARSET
Font.Color = clLime
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
end
object StatusBar1: TStatusBar
Left = 0
Top = 440
Width = 416
Height = 19
Panels = <
item
Width = 50
end>
SimplePanel = False
end
object TCPData: TServerSocket
Active = True
Port = 9999
ServerType = stNonBlocking
ThreadCacheSize = 20
OnClientDisconnect = TCPDataClientDisconnect
OnClientRead = TCPDataClientRead
OnClientError = TCPDataClientError
Left = 136
Top = 8
end
object ADOConnection: TADOConnection
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=User.mdb;Persist Se' +
'curity Info=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 24
Top = 8
end
object ADOQuery: TADOQuery
Connection = ADOConnection
Parameters = <>
Left = 52
Top = 8
end
object Timer: TTimer
Interval = 3000
OnTimer = TimerTimer
Left = 80
Top = 8
end
object TrayIcon: TTrayIcon
CycleInterval = 0
Hint = #25216#26415#35752#35770#32676#32452#26381#21153#31243#24335
ShowHint = True
MinimizeToTray = True
OnDblClick = TrayIconDblClick
Left = 108
Top = 8
end
end