Delphi TMemo nach hinzufügen von TStrings nicht am Ende

Thema durchsuchen

Ansicht

Themen-Optionen

TMemo nach hinzufügen von TStrings nicht am Ende

Ein Thema von LaNtHaN · begonnen am 15. Feb 2005 · letzter Beitrag vom 16. Feb 2005

Vorheriger Beitrag

Nächster Beitrag

Binärbaum

Registriert seit: 19. Jan 2005
Ort: Elstra
764 Beiträge

Delphi 7 Enterprise

Re: TMemo nach hinzufügen von TStrings nicht am Ende

15. Feb 2005, 21:27

Falls es bei Memo1.Lines.Add immer an das Ende des Memos scrollt, kann man das so lösen:

markieren

Delphi-Quellcode:

			//eigentlichen Text anfügen

Memo1.Lines.AddStrings(Empfang);

//ans Ende scrollen

Memo1.Lines.Add(' ');

//Zeile wieder löschen

Memo1.Lines.Delete(Memo1.Lines.Count);

Dabei wird zusätzlich zum eigentlichen Text noch eine Leerzeile mit Add angfügt, um zur untersten Zeile zu scrollen. Danach wird die Leerzeile sofort wieder gelöscht.

MfG
Binärbaum

There are exactly 10 kinds of people: those who understand binary, and those who don't.
---
"Software reift beim Kunden. Bei Hardware ist es anders: Hardware fault beim Kunden." - Rainer G. Spallek