home *** CD-ROM | disk | FTP | other *** search
- object ThesDialog: TThesDialog
- Left = 515
- Top = 241
- ActiveControl = WordList
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'xxThesaurus: English'
- ClientHeight = 211
- ClientWidth = 361
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- OnCloseQuery = FormCloseQuery
- PixelsPerInch = 96
- TextHeight = 13
- object LookedUpLabel: TLabel
- Left = 8
- Top = 8
- Width = 66
- Height = 13
- Caption = 'xxLooked &Up:'
- FocusControl = LookupCombo
- end
- object ContextsLabel: TLabel
- Left = 8
- Top = 56
- Width = 54
- Height = 13
- Caption = 'xxConte&xts:'
- FocusControl = ContextLV
- end
- object ReplaceWithLabel: TLabel
- Left = 184
- Top = 8
- Width = 78
- Height = 13
- Caption = 'xxReplace &With:'
- FocusControl = ReplaceEdit
- end
- object LookupCombo: TComboBox
- Left = 8
- Top = 24
- Width = 161
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- OnChange = LookupComboChange
- end
- object ContextLV: TListView
- Left = 8
- Top = 72
- Width = 161
- Height = 105
- Anchors = [akLeft, akTop, akBottom]
- Columns = <
- item
- end
- item
- end>
- HideSelection = False
- ReadOnly = True
- RowSelect = True
- ShowColumnHeaders = False
- TabOrder = 1
- ViewStyle = vsReport
- OnChange = ContextLVChange
- end
- object ReplaceEdit: TEdit
- Left = 184
- Top = 24
- Width = 169
- Height = 21
- TabOrder = 2
- OnChange = ReplaceEditChange
- end
- object CloseButton: TButton
- Left = 278
- Top = 184
- Width = 75
- Height = 23
- Anchors = [akLeft, akBottom]
- Cancel = True
- Caption = 'xx&Close'
- TabOrder = 6
- OnClick = CloseButtonClick
- end
- object PreviousButton: TButton
- Left = 8
- Top = 184
- Width = 75
- Height = 23
- Anchors = [akLeft, akBottom]
- Caption = 'xx&Previous'
- Enabled = False
- TabOrder = 4
- OnClick = PreviousButtonClick
- end
- object ReplaceButton: TButton
- Left = 192
- Top = 184
- Width = 75
- Height = 23
- Anchors = [akLeft, akBottom]
- Caption = 'xx&Replace'
- Enabled = False
- TabOrder = 5
- OnClick = ReplaceButtonClick
- end
- object WordList: TListView
- Left = 192
- Top = 48
- Width = 162
- Height = 129
- Anchors = [akLeft, akTop, akBottom]
- Columns = <
- item
- end>
- HideSelection = False
- ReadOnly = True
- RowSelect = True
- ShowColumnHeaders = False
- TabOrder = 3
- ViewStyle = vsReport
- OnChange = WordListChange
- OnDblClick = WordListDblClick
- end
- object LookupButton: TButton
- Left = 94
- Top = 184
- Width = 75
- Height = 23
- Anchors = [akLeft, akBottom]
- Caption = 'xx&Lookup'
- Enabled = False
- TabOrder = 7
- OnClick = LookupButtonClick
- end
- object DialogControl: TThesaurusDialogCtrl
- OnPromptLookup = DialogControlPromptLookup
- OnPromptContext = DialogControlPromptContext
- OnActivate = DialogControlActivate
- Left = 200
- Top = 56
- end
- object Timer: TTimer
- Enabled = False
- Interval = 10
- OnTimer = TimerTimer
- Left = 200
- Top = 88
- end
- end
-