Ok soweit funktioniert das, aber wie kann ich einen Text manuell als Link markieren?
Und ich bin noch dabei den ersten Teil des Textes zu färben.
Also ungefähr so:
Mustermann:
Hallo
Aber wie kann ich das in dem Richedit machen?
Ich habs zum testen einmal so versucht funtzt aber nicht:
Delphi-Quellcode:
procedure AddColoredLine(ARichEdit: TTransparentRichEdit; AText: string);
begin
with ARichEdit do
begin
ARichEdit.SelStart := 0;
ARichEdit.SelLength := 3;
SelAttributes.Color := clred;
ARichEdit.SelStart := 4;
ARichEdit.SelLength := 7;
SelAttributes.Color := clgreen;
Lines.Add(AText);
end;
end;
Leider wird dadurch der gesamte Text grün