/Gedemin/IBX/IBFilterDialog.dfm

  1object frmIBFilterDialog: TfrmIBFilterDialog
  2  Left = 210
  3  Top = 206
  4  BorderIcons = [biSystemMenu]
  5  BorderStyle = bsDialog
  6  Caption = 'IBX Filter Dialog'
  7  ClientHeight = 233
  8  ClientWidth = 437
  9  Color = clBtnFace
 10  Font.Charset = DEFAULT_CHARSET
 11  Font.Color = clWindowText
 12  Font.Height = -11
 13  Font.Name = 'MS Sans Serif'
 14  Font.Style = []
 15  Position = poScreenCenter
 16  OnActivate = FormActivate
 17  OnCreate = FormCreate
 18  OnDestroy = FormDestroy
 19  PixelsPerInch = 96
 20  TextHeight = 13
 21  object Label1: TLabel
 22    Left = 0
 23    Top = 0
 24    Width = 27
 25    Height = 13
 26    Caption = 'Fields'
 27  end
 28  object pgeFields: TPageControl
 29    Left = 0
 30    Top = 16
 31    Width = 161
 32    Height = 213
 33    ActivePage = tabAll
 34    HotTrack = True
 35    TabOrder = 0
 36    TabPosition = tpBottom
 37    OnChanging = pgeFieldsChanging
 38    object tabAll: TTabSheet
 39      Caption = '&All'
 40      object lstAllFields: TListBox
 41        Left = 0
 42        Top = 0
 43        Width = 153
 44        Height = 185
 45        Align = alClient
 46        ItemHeight = 13
 47        Sorted = True
 48        TabOrder = 0
 49        OnClick = FieldsListBoxClick
 50      end
 51    end
 52    object tabSelected: TTabSheet
 53      Caption = '&Selected'
 54      ImageIndex = 1
 55      object lstSelectedFields: TListBox
 56        Left = 0
 57        Top = 0
 58        Width = 153
 59        Height = 185
 60        Align = alClient
 61        ItemHeight = 13
 62        Sorted = True
 63        TabOrder = 0
 64        OnClick = FieldsListBoxClick
 65      end
 66    end
 67  end
 68  object pgeCriteria: TPageControl
 69    Left = 168
 70    Top = 4
 71    Width = 189
 72    Height = 189
 73    ActivePage = tabByValue
 74    HotTrack = True
 75    TabOrder = 1
 76    TabPosition = tpBottom
 77    object tabByValue: TTabSheet
 78      Caption = 'By &Value'
 79      object Label2: TLabel
 80        Left = 4
 81        Top = 4
 82        Width = 52
 83        Height = 13
 84        Caption = '&Field Value'
 85        FocusControl = edtFieldValue
 86      end
 87      object edtFieldValue: TEdit
 88        Left = 4
 89        Top = 20
 90        Width = 121
 91        Height = 21
 92        TabOrder = 0
 93        OnChange = RefreshClearButtons
 94      end
 95      object btnClearFieldValue: TButton
 96        Left = 132
 97        Top = 20
 98        Width = 45
 99        Height = 21
100        Caption = 'Clear'
101        Enabled = False
102        TabOrder = 1
103        OnClick = btnClearFieldValueClick
104      end
105      object grpSearchType: TRadioGroup
106        Left = 0
107        Top = 44
108        Width = 181
109        Height = 77
110        Caption = 'Search Type'
111        ItemIndex = 0
112        Items.Strings = (
113          '&Exact Match'
114          '&Partial Match at Beginning'
115          'Par&tial Match at End'
116          'Partial Match Any&where')
117        TabOrder = 2
118      end
119      object Panel1: TPanel
120        Left = 0
121        Top = 121
122        Width = 181
123        Height = 39
124        BevelInner = bvRaised
125        BevelOuter = bvLowered
126        TabOrder = 3
127        object cbxCaseSensitive: TCheckBox
128          Left = 8
129          Top = 4
130          Width = 97
131          Height = 17
132          Caption = 'Case Sensi&tive'
133          TabOrder = 0
134        end
135        object cbxNonMatching: TCheckBox
136          Left = 8
137          Top = 20
138          Width = 153
139          Height = 17
140          Caption = 'N&on-matching Records'
141          TabOrder = 1
142        end
143      end
144    end
145    object tabByRange: TTabSheet
146      Caption = 'By &Range'
147      ImageIndex = 1
148      object Label3: TLabel
149        Left = 8
150        Top = 12
151        Width = 71
152        Height = 13
153        Caption = 'S&tarting Range'
154        FocusControl = edtStartingRange
155      end
156      object Label4: TLabel
157        Left = 8
158        Top = 52
159        Width = 68
160        Height = 13
161        Caption = 'En&ding Range'
162        FocusControl = edtEndingRange
163      end
164      object edtStartingRange: TEdit
165        Left = 8
166        Top = 28
167        Width = 121
168        Height = 21
169        TabOrder = 0
170        OnChange = RefreshClearButtons
171      end
172      object edtEndingRange: TEdit
173        Left = 8
174        Top = 68
175        Width = 121
176        Height = 21
177        TabOrder = 1
178        OnChange = RefreshClearButtons
179      end
180      object btnClearStartingRange: TButton
181        Left = 132
182        Top = 28
183        Width = 45
184        Height = 21
185        Caption = 'Clear'
186        Enabled = False
187        TabOrder = 2
188        OnClick = btnClearStartingRangeClick
189      end
190      object btnClearEndingRange: TButton
191        Left = 132
192        Top = 68
193        Width = 45
194        Height = 21
195        Caption = 'Clear'
196        Enabled = False
197        TabOrder = 3
198        OnClick = btnClearEndingRangeClick
199      end
200    end
201  end
202  object btnOk: TBitBtn
203    Left = 360
204    Top = 17
205    Width = 75
206    Height = 25
207    BiDiMode = bdLeftToRight
208    Caption = '&OK      '
209    ParentBiDiMode = False
210    TabOrder = 2
211    OnClick = btnOkClick
212    Kind = bkOK
213  end
214  object btnCancel: TBitBtn
215    Left = 360
216    Top = 53
217    Width = 75
218    Height = 25
219    TabOrder = 3
220    OnClick = btnCancelClick
221    Kind = bkCancel
222  end
223  object btnViewSummary: TButton
224    Left = 172
225    Top = 204
226    Width = 85
227    Height = 25
228    Caption = 'View Su&mmary'
229    Enabled = False
230    TabOrder = 4
231    OnClick = btnViewSummaryClick
232  end
233  object btnNewSearch: TButton
234    Left = 272
235    Top = 204
236    Width = 85
237    Height = 25
238    Caption = '&New Search'
239    Enabled = False
240    TabOrder = 5
241    OnClick = btnNewSearchClick
242  end
243end