home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2000 January
/
PCWorld_2000-01_cd.bin
/
Komunik
/
News
/
Xnews
/
Xnews.exe
/
0
/
RCDATA
/
TFMXPAT
/
TFMXPAT.txt
Wrap
Text File
|
1999-11-08
|
3KB
|
137 lines
object fmXPat: TfmXPat
Left = 239
Top = 269
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'XPAT Search'
ClientHeight = 236
ClientWidth = 469
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
OldCreateOrder = True
Position = poScreenCenter
OnClose = FormClose
OnKeyPress = FormKeyPress
OnShow = edRangeChange
PixelsPerInch = 120
TextHeight = 16
object Label1: TLabel
Left = 16
Top = 18
Width = 64
Height = 16
Caption = 'Search for:'
end
object Label2: TLabel
Left = 104
Top = 45
Width = 106
Height = 16
Caption = 'Example: *xnews*'
end
object Label3: TLabel
Left = 30
Top = 200
Width = 78
Height = 16
Caption = 'Assign score'
end
object Label4: TLabel
Left = 16
Top = 76
Width = 41
Height = 16
Caption = 'Range'
end
object lbRange: TLabel
Left = 248
Top = 76
Width = 3
Height = 16
end
object coXPat: TMyComboBox
Left = 88
Top = 16
Width = 361
Height = 24
Hint = 'Enter one or more wildcard patterns, separate by space'
DropDownCount = 10
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ItemHeight = 16
ParentFont = False
TabOrder = 0
RegKey = 'Software\Xnews\coXPat'
end
object rgHeader: TRadioGroup
Left = 16
Top = 105
Width = 433
Height = 80
Caption = 'Search header'
Columns = 3
ItemIndex = 0
Items.Strings = (
'Subject'
'From'
'References'
'Message-ID'
'Keyword'
'Organization')
TabOrder = 1
end
object bOkay: TButton
Left = 280
Top = 199
Width = 75
Height = 25
Caption = 'Okay'
Default = True
ModalResult = 1
TabOrder = 3
end
object bCancel: TButton
Left = 376
Top = 199
Width = 75
Height = 25
Caption = 'Cancel'
ModalResult = 2
TabOrder = 4
end
object edScore: TSpinEdit
Left = 120
Top = 198
Width = 81
Height = 26
MaxValue = 20000
MinValue = -20000
TabOrder = 2
Value = 0
end
object cbCase: TCheckBox
Left = 335
Top = 45
Width = 111
Height = 19
Caption = 'Case sensitive'
TabOrder = 5
end
object edRange: TEdit
Left = 88
Top = 71
Width = 145
Height = 24
TabOrder = 6
OnChange = edRangeChange
end
end