Memo enabled=false + Scrollbar

[Knotti2005]

Wie kann ich ein Memo erstellen welches nicht geändert werden kann also keine Benutzerinageb zulässig sind wo aber der Benutzer eine Verticale Scrollbar verschieben kann...

[Bernhard Geyer]

Delphi-Quellcode:

ReadOnly := True

[Knotti2005]

ja aber man kann trozdem noch die cuorsor Position setzen...

[Bernhard Geyer]

Zitat:

Zitat von Knotti2005

ja aber man kann trozdem noch die cuorsor Position setzen...

Und was stört daran?
Du kannst ja im OnEnter-Event wieder ein anderes Control aktivieren.

[Deltachaos]

mal ne frage wie mache ich das das die scrollbar automatisch mit nach unten springt sobald ich text in das memo schreiben lasse

[toms]

Zitat:

Zitat von Deltachaos

mal ne frage wie mache ich das das die scrollbar automatisch mit nach unten springt sobald ich text in das memo schreiben lasse

Bei mir geht die Scrollbar automatisch nach unten wenn ich mit

Delphi-Quellcode:

Memo1.lines.Add('test');

Text hinzufüge.

[DP-Maintenance]

Dieses Thema wurde von "Christian Seehase" von "Programmieren allgemein" nach "VCL / WinForms / Controls" verschoben.
Ein VCL-Thema

[Deltachaos]

Zitat:

Zitat von toms

Zitat:

Zitat von Deltachaos

mal ne frage wie mache ich das das die scrollbar automatisch mit nach unten springt sobald ich text in das memo schreiben lasse

Bei mir geht die Scrollbar automatisch nach unten wenn ich mit

Delphi-Quellcode:

Memo1.lines.Add('test');

Text hinzufüge.

Ich habe es jetzt so gelöst:

Wie kann ich zur ersten oder letzten Zeile im Memo scrollen?

Dafür gibt es die EM_LineScroll-Nachricht:

Delphi-Quellcode:

{zur ersten Zeile:}
  Memo1.Perform(EM_LineScroll, 0 , -Memo1.Lines.Count-1);
{zur letzen Zeile:}
  Memo1.Perform(EM_LineScroll, 0 , Memo1.Lines.Count-1);

Mit der EM_ScrollCaret-Nachricht scrollt man die aktuelle Cursorposition im Memo in die Anzeige:

Delphi-Quellcode:

  Memo1.Perform(EM_ScrollCaret, 0, 0);

Quelle: http://www.delphi-fundgrube.de/faq15.htm#topic1504