Mein Problem ist gelöst @Reedemer, habe es so versucht wie Du meintest, funzt!
Danke für den Nachtrag @Delphi.Narium!!
Delphi-Quellcode:
procedure TfrmMain.reMainChange(Sender: TObject); // reMain = RichEdit
var
Len: Integer;
begin
try
Len := StrToInt(edtPosition.Text); // edtPosition = Editfeld mit Positionsangabe
except
Len := 25;
edtPosition.Text := '25';
end;
if Length(reMain.Text) >= Len then
begin
reMain.SelStart := Len;
reMain.SelLength := Length(reMain.Text);
reMain.SelAttributes.Color := clGreen;
reMain.SelStart := Length(reMain.Text);
reMain.SelLength := 0;
end;
end;
So nutze ich es nun, bestimmt nicht schön aber macht erstmal alles so wie ich es wollte. Flackert ganz schön dolle, mal sehen was ich da noch rausholen kann.
Es tut mir leid für diesen zwischen-request innerhalb eines fremd threads!