change for rvaspell.pas
Posted: Tue Jan 30, 2007 12:54 pm
We will suggest a change for the rvaspell.pas:
Add modalresult property in TRVASpell
property ModalResult: TModalResult read FModalResult write FModalResult default mrOK;
And change the function TRVASpellHelper.Check Line 492/493 to:
Self.RVASpell.ModalResult := frm.ShowModal;
FRVASpell.DoSpellFormAction(Self.RVASpell.ModalResult, FWord, frm.cmb.Text);
To do so, you can use for example:
spellchecker.check(rvEditor, rvesFromStart);
if spellChecker.ModalResult <> mrCancel then
ShowMessage('Spellingscheck finished');
Add modalresult property in TRVASpell
property ModalResult: TModalResult read FModalResult write FModalResult default mrOK;
And change the function TRVASpellHelper.Check Line 492/493 to:
Self.RVASpell.ModalResult := frm.ShowModal;
FRVASpell.DoSpellFormAction(Self.RVASpell.ModalResult, FWord, frm.cmb.Text);
To do so, you can use for example:
spellchecker.check(rvEditor, rvesFromStart);
if spellChecker.ModalResult <> mrCancel then
ShowMessage('Spellingscheck finished');