home *** CD-ROM | disk | FTP | other *** search
- object fmRegex: TfmRegex
- Left = 191
- Top = 219
- ActiveControl = coRegex
- BorderIcons = [biSystemMenu]
- BorderStyle = bsToolWindow
- Caption = 'Test Regex'
- ClientHeight = 296
- ClientWidth = 522
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- OldCreateOrder = False
- Position = poScreenCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 120
- TextHeight = 16
- object Label1: TLabel
- Left = 42
- Top = 23
- Width = 42
- Height = 16
- Caption = '&Pattern'
- FocusControl = coRegex
- end
- object Label2: TLabel
- Left = 22
- Top = 63
- Width = 62
- Height = 16
- Caption = '&Test string'
- FocusControl = coStr
- end
- object Label3: TLabel
- Left = 46
- Top = 100
- Width = 38
- Height = 16
- Caption = 'Result'
- end
- object Label4: TLabel
- Left = 11
- Top = 145
- Width = 73
- Height = 80
- Alignment = taRightJustify
- Caption = 'Matched'#13#10'string'#13#10'and'#13#10'sub-'#13#10'expressions'
- end
- object coRegex: TMyComboBox
- Left = 104
- Top = 18
- Width = 402
- Height = 24
- Hint = 'Enter filter regex'
- Ctl3D = False
- DropDownCount = 10
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ItemHeight = 16
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 0
- RegKey = 'Software\Xnews\coRegexPattern'
- end
- object coStr: TMyComboBox
- Left = 104
- Top = 58
- Width = 402
- Height = 24
- Hint = 'Enter filter regex'
- Ctl3D = False
- DropDownCount = 10
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ItemHeight = 16
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 1
- RegKey = 'Software\Xnews\coRegexString'
- end
- object bMatch: TButton
- Left = 428
- Top = 97
- Width = 75
- Height = 25
- Caption = '&Match'
- Default = True
- TabOrder = 3
- OnClick = bMatchClick
- end
- object Button2: TButton
- Left = 428
- Top = 252
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Close'
- ModalResult = 1
- TabOrder = 6
- OnClick = Button2Click
- end
- object edResult: TEdit
- Left = 104
- Top = 97
- Width = 303
- Height = 24
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- ReadOnly = True
- TabOrder = 2
- end
- object cbCase: TCheckBox
- Left = 428
- Top = 144
- Width = 89
- Height = 17
- Caption = 'Match case'
- TabOrder = 5
- end
- object Memo: TMemo
- Left = 104
- Top = 145
- Width = 303
- Height = 131
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ReadOnly = True
- ScrollBars = ssBoth
- TabOrder = 4
- WordWrap = False
- end
- end
-