object frmHunSpell: TfrmHunSpell Left = 192 Top = 114 BorderStyle = bsDialog Caption = 'SpellCheck based on open source HanSpell Engine' ClientHeight = 516 ClientWidth = 737 Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnActivate = FormActivate OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 16 object lblDictionary: TLabel Left = 11 Top = 3 Width = 116 Height = 16 Caption = 'Main &Dictionary File:' FocusControl = edtDictionary end object lblDictionariesURL: TLabel Left = 8 Top = 32 Width = 417 Height = 14 Cursor = crHandPoint Hint = 'URL for compatible dictionaries for other languages' Caption = 'http://archive.services.openoffice.org/pub/mirror/OpenOffice.org' + '/contrib/dictionaries/' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsItalic, fsUnderline] ParentFont = False ParentShowHint = False ShowHint = True OnClick = lblDictionariesURLClick end object pnlMisSpelled: TPanel Left = 0 Top = 268 Width = 729 Height = 248 BevelOuter = bvNone TabOrder = 4 object Label1: TLabel Left = 11 Top = 26 Width = 176 Height = 16 Caption = '&Suggestions and Alternavtives:' FocusControl = lstSuggestions end object Label4: TLabel Left = 11 Top = 3 Width = 133 Height = 16 Caption = 'C&urrent Misspelt Word:' FocusControl = edtMisSpeltWordForExtraHint end object lstSuggestions: TListBox Left = 3 Top = 43 Width = 406 Height = 197 ItemHeight = 16 TabOrder = 1 OnDblClick = lstSuggestionsDblClick end object edtMisSpeltWordForExtraHint: TEdit Left = 151 Top = 4 Width = 554 Height = 18 AutoSize = False BorderStyle = bsNone Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -13 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 0 Text = 'HighlightEdit' Visible = False end object btnReplaceWith: TButton Left = 452 Top = 171 Width = 110 Height = 25 Caption = '&Replace with ...' TabOrder = 6 OnClick = btnReplaceWithClick end object btnChangeAll: TButton Left = 452 Top = 127 Width = 110 Height = 25 Caption = 'Change &All' TabOrder = 3 OnClick = btnChangeAllClick end object btnChange: TButton Left = 452 Top = 84 Width = 110 Height = 25 Caption = '&Change' TabOrder = 2 OnClick = btnChangeClick end object btnAddToDictionary: TButton Left = 611 Top = 171 Width = 110 Height = 25 Caption = 'A&dd to Dictionary' TabOrder = 8 OnClick = btnAddToDictionaryClick end object btnIgnoreAll: TButton Left = 611 Top = 127 Width = 110 Height = 25 Caption = 'I&gnore All' TabOrder = 5 OnClick = btnIgnoreAllClick end object btnIgnoreOnce: TButton Left = 611 Top = 84 Width = 110 Height = 25 Caption = '&Ignore Once' TabOrder = 4 OnClick = btnIgnoreOnceClick end object btnAbort: TButton Left = 611 Top = 215 Width = 110 Height = 25 Caption = 'A&bort' ModalResult = 3 TabOrder = 9 OnClick = btnAbortClick end object btnUndo: TButton Left = 452 Top = 215 Width = 110 Height = 25 Caption = '&Undo' TabOrder = 7 OnClick = btnUndoClick end end object edtDictionary: TEdit Left = 131 Top = 2 Width = 531 Height = 23 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Comic Sans MS' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 1 OnEnter = edtDictionaryEnter end object btnSelectDict: TBitBtn Left = 485 Top = 26 Width = 244 Height = 25 Caption = '&Browse for and select different dictionary' TabOrder = 2 OnClick = btnSelectDictClick end object RichEdit1: TRichEdit Left = 3 Top = 76 Width = 726 Height = 186 Lines.Strings = ( 'Type orr Paste heree the text ' ' for which you wish to do the SpellCheck') ScrollBars = ssBoth TabOrder = 0 OnKeyDown = RichEdit1KeyDown OnKeyUp = RichEdit1KeyUp end object btnStart: TButton Left = 452 Top = 310 Width = 110 Height = 25 Caption = '&Start SpellCheck' TabOrder = 3 OnClick = btnStartClick end object btnClose: TButton Left = 611 Top = 310 Width = 110 Height = 25 Caption = 'C&lose' ModalResult = 1 TabOrder = 5 Visible = False OnClick = btnCloseClick end object cbIgnoreAllCaps: TCheckBox Left = 131 Top = 54 Width = 178 Height = 17 Caption = 'Ignore words in &UpperCase' TabOrder = 6 OnClick = cbIgnoreAllCapsClick end object cbIgnoreDigit: TCheckBox Left = 339 Top = 53 Width = 166 Height = 17 Caption = 'Ignore words with &digits' TabOrder = 7 OnClick = cbIgnoreDigitClick end object OpenDialog1: TOpenDialog DefaultExt = '*.Dict' FileName = 'en_US-large.dic' Filter = 'HanSpell Dictionary & Aff file|*.dic' Title = 'Specify Dictionary file (Corresponding *.aff file also required)' Left = 668 Top = 65534 end object SpellCheck1: TskaHunSpellChecker Active = False MisSpeltWord = edtMisSpeltWordForExtraHint OnStart = SpellCheck1Start OnStateChange = SpellCheck1StateChange OnAbort = SpellCheck1Abort SourceTextControl = RichEdit1 SuggestionList = lstSuggestions Left = 368 Top = 104 end end