Как использовать проверку грамматики?

Материал из DRKB


{
  If you are using Delphi 2+ and have the ActiveX component TVSSpell, it is very
  simple to add a spell checker to your TMemo applications.
  (Note: Do not use this component with a Rich Edit application because of text
  formatting problems.)
}

procedure TForm1.Button1Click(Sender: TObject);
begin
  if Memo1.Text = '' then Exit;

  VSSpell1.CheckText := Memo1.Text;
  if VSSpell1.ResultCode = 0 then
    Memo1.Text := VSSpell1.Text;
end;


{
  To distribute a VisualSpeller application you have to include the following
  files:

- VsSpell.HLP
- VSPELL32.OCX
- VSPELL32.DLL
- AMERICAN.VTD
- VSPELL.HLP
}


Language: en
Source: http://www.swissdelphicenter.ch/en/tipsindex.php
ID: 04466