Wie kann ich vom Programm aus durch ein TMemo scrollen?


Auch alle nicht in der Delphi-VCL gekapselten Funktionen kann man durch ein PostMessage() der Nachricht WM_VSCROLL an das Memo erreichen, hier einige Beispiele:

an den Anfang des Textes:

  PostMessage(Memo1.Handle,WM_VSCROLL,SB_TOP,0);

ans Ende des Textes:

  PostMessage(Memo1.Handle,WM_VSCROLL,SB_BOTTOM,0);

eine Zeile hoch:

  PostMessage(Memo1.Handle,WM_VSCROLL,SB_LINEUP,0);

eine Zeile runter:

  PostMessage(Memo1.Handle,WM_VSCROLL,SB_LINEDOWN,0);

eine Seite hoch:

  PostMessage(Memo1.Handle,WM_VSCROLL,SB_PAGEUP,0);

eine Seite runter:

  PostMessage(Memo1.Handle,WM_VSCROLL,SB_PAGEDOWN,0);

Bewegungen innerhalb einer Zeile sind entsprechend mit der Nachricht WM_HSCROLL möglich...

Delphi 1 Delphi 2 Delphi 3 Delphi 4
nicht getestet Version nicht betroffen getestet

siehe auch:

Wie kann ich zu einer bestimmten Zeile eines TMemo (order TRichEdit) scrollen?
Wie ermittle ich in einem TMemo (oder TRichEdit) die Cursorposition?
Wie fügt man an einer bestimmten Position Text in ein TMemo (order TEdit, TRichEdit) ein?
Wie kann ich den blinkenden Cursor in einem deaktivierten TMemo (oder TEdit) verstecken?
Wie kann ich die maximale Textlänge in einem TRichEdit erhöhen?


Delphi FAQ