Highlight in SynMemo für eine Zeile?

[Teekeks]

Hi!
Ich habe nun schonwieder ein Problem.
Ich habe ein SynMemo und trage dort immer Zeilen ein. So weit so gut. Doch wie kann ich jetzt alle Zeilen die ein 'heute' enthalten, in die Farbe Rot gefärbt?

würde mich über hilfe freuen!
gruß Teekeks

[theodp]

Über das Ereignis OnSpecialLineColors

[Teekeks]

Erstmal Danke für die Antwort.
Doch: Wie benutze ich dieses Ereigniss?
Hab schon ein bischen probiert, kriege das aber irgentwie nicht hin...

gruß Teekeks

[Teekeks]

OK. Ich habs rausgekrigt ^^

Danke für deine Hilfe!

gruß Teekeks

[fkerber]

Hi!

Vllt. könntest du kurz beschreiben, wie du das Problem lösen konntest?
Wenn dann mal wieder jemand vor dem Problem steht, hilft ihm das sicher weiter...


Ciao, Frederic


P.S.
Du machst das Ganze unter Lazarus, ist das richtig?

[Jakob Ullmann]

Zitat von fkerber:

Du machst das Ganze unter Lazarus, ist das richtig?

Sollte eigentlich nicht das Problem sein. SynEdit ist ja für beides das gleiche, oder?

Delphi:

Delphi-Quellcode:

procedure TForm1.SynMemo1SpecialLineColors(Sender: TObject; Line: Integer;
  var Special: Boolean; var FG, BG: TColor);
begin
  if Pos('Hallo', SynMemo1.Lines[Line - 1]) > 0 then
  begin
    BG := clRed;
  end;
end;

Z. B. Eingabe von 'Welt, Hallo Welt'.