Mega Code Archive

 

Categories / Delphi / Activex OLE

 

Use the vspell activex component

{ 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.) Wenn Delphi 2+ verwendet wird, und die ActiveX Komponente TVSSpell installiert ist, ist es sehr einfach eine Rechtschreibekorrektur für die TMemo Komponente zu erstellen. (Anmerkung: Die Komponente sollte nicht für RichEdit verwendet werden, da es dort Probleme mit der Textformatierung gibt. } 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: Um eine Anwendung mit VisualSpeller zu vertreiben, müssen folgende Dateien mitgeliefert werden: } { - VsSpell.HLP - VSPELL32.OCX - VSPELL32.DLL - AMERICAN.VTD - VSPELL.HLP }