Problem mit for

[therowe]

Ich habe folgenden Delphi code.

Delphi-Quellcode:

var
  IDA: TIntegerDynArray;
  i: integer;
  str: string;
    str2: string;
begin
....
  str := '<' to '>'; // Hier tritt dann der Fehler auf
  IDA := FindTextAll(RichEdit1, str, []);
  for i := Low(ida) to High(ida)do
    with RichEdit1 do
    begin
      SelStart := ida[i];
      SelLength := Length(str);
      SelAttributes.Color := cllime;
      SelAttributes.Style := [fsbold];
    end;
end;

das funtzt auch soweit, aber wenn ich jetzt den Text von '<' bis '>' mit der Farbe Markieren möchte, mit to usw. funtzts nicht mehr ich hab schon einiges durchprobiert, aber ich bekomms einfach nicht hin. Das ganze ist für ein Referat in der Schule zu Programmiersprachen, wo wir verschiedene Beispiele zu diesen Sprachen machen müssen. Das Prog ist auch fast fertig es fehlt nur noch dieser kleine Teil. Wäre nett wenn ihr mir helfen könntet