Operator ist auf diesen operatortyp nicht anwendbar

[himitsu]

'ne kleine Umformatierung meint da was Anderes:

Delphi-Quellcode:

procedure TFormrechtschreibung.Rechtschreibungpruefen;
var
  woerterbuch: TStringList;
  Zeile: string;
  wort: shortstring;
  wortanfang, wortende, S, R: Integer;
begin
  woerterbuch := TStringList.Create;
  woerterbuch.LoadFromFile('wörterbuch.txt');
  wortanfang := 1;
  wortende := 1;
  Zeile := Form1.Memo.Lines[i];
  for R := 1 to Length(Zeile) do
  begin
    wort := '';

   if Zeile[wortende] in ... then
    begin
      ...
    end
    else
      wortende := wortende + 1;
    if wortende = Length(Zeile) then
      i := i + 1;

  end; // von if  // nee, vom for
end; // von for   // und hier von der Prozedur

end;  // das hier gehört nicht mehr dazu