home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2007 June
/
PCWorld_2007-06_cd.bin
/
komunikace
/
qip
/
qip8020.exe
/
qip.exe
/
0
/
RCDATA
/
TFINDFORM
/
TFINDFORM.txt
Wrap
Text File
|
2007-04-21
|
3KB
|
129 lines
object FindForm: TFindForm
Left = 378
Top = 303
Width = 420
Height = 211
Caption = 'Find Contact'
Color = clBtnFace
DefaultMonitor = dmMainForm
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnKeyDown = FormKeyDown
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 412
Height = 60
Align = alTop
TabOrder = 0
object LabelAcc: TLabel
Left = 9
Top = 7
Width = 105
Height = 13
Caption = 'ICQ# / SN, Nickname'
end
object EditFind: TEdit
Left = 8
Top = 24
Width = 265
Height = 21
TabOrder = 1
OnChange = EditFindChange
end
object ButtonClose: TButton
Left = 295
Top = 22
Width = 98
Height = 25
Caption = 'Close'
TabOrder = 0
OnClick = ButtonCloseClick
end
end
object Panel2: TPanel
Left = 0
Top = 60
Width = 412
Height = 124
Align = alClient
TabOrder = 1
object ListViewRes: TListView
Left = 1
Top = 1
Width = 410
Height = 122
Align = alClient
Columns = <
item
Caption = 'ICQ# / SN'
MaxWidth = 90
MinWidth = 90
Width = 90
end
item
Caption = 'Nick Name'
MinWidth = 2
Width = 100
end
item
Caption = 'Email'
MinWidth = 2
end
item
Caption = 'Cellular#'
MinWidth = 2
Width = 75
end
item
Caption = 'Notice'
MinWidth = 2
Width = 70
end>
HideSelection = False
ReadOnly = True
RowSelect = True
ParentShowHint = False
ShowHint = True
SmallImages = MainForm.ImageListCLS
TabOrder = 0
ViewStyle = vsReport
OnColumnClick = ListViewResColumnClick
OnCompare = ListViewResCompare
OnContextPopup = ListViewResContextPopup
OnDblClick = ListViewResDblClick
OnEnter = ListViewResEnter
OnKeyDown = ListViewResKeyDown
OnSelectItem = ListViewResSelectItem
end
end
object PopupMenuFind: TPopupMenu
AutoHotkeys = maManual
Images = MainForm.ImageList1
Left = 394
Top = 322
object CustomItemCopySN: TMenuItem
Caption = 'Copy User'#39's Uin or SN'
OnClick = CustomItemCopySNClick
end
object CustomItemUserDets: TMenuItem
Caption = 'User Details'
OnClick = CustomItemUserDetsClick
end
object CustomItemSendMsg: TMenuItem
Caption = 'Send Message'
OnClick = CustomItemSendMsgClick
end
end
end