inherited frmHunSpell: TfrmHunSpell Left = 192 Top = 114 BorderStyle = bsDialog Caption = 'SpellCheck based on open source HanSpell Engine' ClientHeight = 516 ClientWidth = 737 Font.Charset = ANSI_CHARSET Font.Height = -13 Font.Name = 'Tahoma' Position = poScreenCenter OnActivate = FormActivate OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnShow = FormShow ExplicitWidth = 743 ExplicitHeight = 548 PixelsPerInch = 96 TextHeight = 16 object lblDictionary: TLabel [0] Left = 11 Top = 1 Width = 116 Height = 16 Caption = 'Main &Dictionary File:' FocusControl = edtDictionary end object lblOpenMedURL: TLabel [1] Left = 11 Top = 54 Width = 707 Height = 14 Cursor = crHandPoint Hint = 'URL for Medical Dictionary current being used (GPL license)' Caption = 'http://code.openhub.net/project?pid=08caPIxPvc0&prevcid=1&did=op' + 'enmedspel%2Fsrc%2Fdictionaries&cid=sPPyiSPxN3U&fp=363738&projSel' + 'ected=true' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsUnderline] ParentFont = False ParentShowHint = False ShowHint = True WordWrap = True OnClick = lblOpenMedURLClick end object lblDictionariesURL: TLabel [2] Left = 11 Top = 25 Width = 409 Height = 14 Cursor = crHandPoint Hint = 'URL for other language dictionaries' 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 = [fsUnderline] ParentFont = False ParentShowHint = False ShowHint = True OnClick = lblOpenMedURLClick end object pnlAbout: TPanel [3] Left = 8 Top = 8 Width = 721 Height = 508 Caption = 'Work under progress by Sunil Kumar Arora (digitiger@gmail.com).' + '.........Thi will be updated later........' TabOrder = 5 Visible = False object Button1: TButton Left = 326 Top = 464 Width = 75 Height = 25 Caption = 'OK' TabOrder = 0 OnClick = Button1Click end end object pnlMisSpelled: TPanel [4] Left = 0 Top = 268 Width = 729 Height = 248 BevelOuter = bvNone TabOrder = 1 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 = edtMisSpelt end object lstSuggestions: TListBox Left = 3 Top = 43 Width = 406 Height = 197 ItemHeight = 16 TabOrder = 1 OnDblClick = lstSuggestionsDblClick end object edtMisSpelt: TEdit Left = 150 Top = 2 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 = 165 Width = 110 Height = 25 Caption = 'R&eplace with ...' TabOrder = 6 OnClick = btnReplaceWithClick end object btnChangeAll: TButton Left = 452 Top = 116 Width = 110 Height = 25 Caption = 'Change &All' TabOrder = 3 OnClick = btnChangeAllClick end object btnChange: TButton Left = 452 Top = 67 Width = 110 Height = 25 Caption = '&Change' TabOrder = 2 OnClick = btnChangeClick end object btnAddToDictionary: TButton Left = 611 Top = 165 Width = 110 Height = 25 Caption = 'A&dd to Dictionary' TabOrder = 7 OnClick = btnAddToDictionaryClick end object btnIgnoreAll: TButton Left = 611 Top = 116 Width = 110 Height = 25 Caption = 'I&gnore All' TabOrder = 5 OnClick = btnIgnoreAllClick end object btnIgnoreOnce: TButton Left = 611 Top = 67 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' TabOrder = 9 OnClick = btnAbortClick end object btnUndo: TButton Left = 452 Top = 215 Width = 110 Height = 25 Caption = '&Undo' TabOrder = 8 OnClick = btnUndoClick end end object edtDictionary: TEdit [5] Left = 131 Top = 0 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 = 6 OnEnter = edtDictionaryEnter end object btnSelectDict: TBitBtn [6] Left = 471 Top = 23 Width = 258 Height = 25 Caption = 'Bro&wse for and select different dictionary' TabOrder = 7 OnClick = btnSelectDictClick end object RichEdit1: TRichEdit [7] Left = 3 Top = 101 Width = 726 Height = 161 Lines.Strings = ( 'Nothing to Check !') ScrollBars = ssBoth TabOrder = 0 OnKeyDown = RichEdit1KeyDown OnKeyUp = RichEdit1KeyUp end object btnAbout: TButton [8] Left = 300 Top = 285 Width = 110 Height = 25 Caption = 'Abo&ut' TabOrder = 4 OnClick = btnAboutClick end object btnClose: TButton [9] Left = 611 Top = 285 Width = 110 Height = 25 Caption = 'Finish && C&lose' ModalResult = 1 TabOrder = 3 Visible = False OnClick = btnCloseClick end object cbIgnoreAllCaps: TCheckBox [10] Left = 131 Top = 74 Width = 178 Height = 17 Caption = 'Ignore words in &UpperCase' TabOrder = 8 OnClick = cbIgnoreAllCapsClick end object cbIgnoreDigit: TCheckBox [11] Left = 339 Top = 73 Width = 166 Height = 17 Caption = 'Ignore words with &digits' TabOrder = 9 OnClick = cbIgnoreDigitClick end object btnRestat: TButton [12] Left = 452 Top = 285 Width = 110 Height = 25 Caption = 'Re&Start Check' TabOrder = 2 OnClick = btnRestatClick end inherited amgrMain: TVA508AccessibilityManager Data = ( ( 'Component = pnlMisSpelled' 'Status = stsDefault') ( 'Component = lstSuggestions' 'Status = stsDefault') ( 'Component = edtMisSpelt' 'Status = stsDefault') ( 'Component = btnReplaceWith' 'Status = stsDefault') ( 'Component = btnChangeAll' 'Status = stsDefault') ( 'Component = btnChange' 'Status = stsDefault') ( 'Component = btnAddToDictionary' 'Status = stsDefault') ( 'Component = btnIgnoreAll' 'Status = stsDefault') ( 'Component = btnIgnoreOnce' 'Status = stsDefault') ( 'Component = btnAbort' 'Status = stsDefault') ( 'Component = btnClose' 'Status = stsDefault') ( 'Component = edtDictionary' 'Status = stsDefault') ( 'Component = btnSelectDict' 'Status = stsDefault') ( 'Component = RichEdit1' 'Status = stsDefault') ( 'Component = frmHunSpell' 'Status = stsDefault') ( 'Component = btnAbout' 'Status = stsDefault') ( 'Component = pnlAbout' 'Status = stsDefault') ( 'Component = Button1' 'Status = stsDefault') ( 'Component = btnUndo' 'Status = stsDefault') ( 'Component = cbIgnoreAllCaps' 'Status = stsDefault') ( 'Component = cbIgnoreDigit' 'Status = stsDefault') ( 'Component = btnRestat' 'Status = stsDefault')) 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 CustDictionaryFile = 'C:\Documents and Settings\All Users\Documents\CustomDictionary.d' + 'ic' MisSpeltWord = edtMisSpelt OnStart = SpellCheck1Start OnStateChange = SpellCheck1StateChange OnAbort = SpellCheck1Abort SourceTextControl = RichEdit1 SuggestionList = lstSuggestions Left = 368 Top = 104 end end