Proble mit Trichedit

[runger]

Hallo,

ich erzeuge viele Einträge in einem Trichedit. Nachdem das Einlesen der Strings beendet ist, steht der Cursor am unteren Ende der Liste.
Wie kann ich den Cursor an den Anfang des Texte setzen?
Mit selstart setzt er zwar den Cursor nach oben zeigt mir aber immer noch das Ende des Feldes an.

Rainer

[marabu]

Hallo Rainer,

manchmal reicht das hier:

Delphi-Quellcode:

with RichEdit do
  SendMessage(Handle, EM_LINESCROLL, 0, - LINES.Count);

Grüße vom marabu

[runger]

Hallo marabu,

Klasse hat sofort geklappt. Bei mir wird das Ganze in einem array of trichedit benutzt wobei sp das array darstellt und sb1 eine tscrollbar.

Delphi-Quellcode:

   SendMessage(sp[sb1.position].Handle, EM_LINESCROLL, 0, - sp[sb1.position].LINES.Count);

Nochmals vielen Dank, auf die Idee wäre ich nie gekommen, obwohl eigentlich ganz einfach.

Danke Rainer