Vielen Dank für den Link, leider hat es bei mir wieder nicht funktioniert.
Ich habe folgenden Code(in meinem Richedit(Log_Output) befinden sich nur mehr zeilen mit error codes, in einer Listbox(Error_Codes) die zugehörigen Errorcodes, also exakt gleich viele items):
Delphi-Quellcode:
with Log_Output do
begin
SelStart := Perform(EM_LINEINDEX, Error_Codes.ItemIndex, 0);
Perform(EM_SCROLLCARET, 0, 0);
Invalidate;
end;
Leider macht es aber genau gar nichts.