Autor Beitrag
Tino
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Veteran
Beiträge: 9839
Erhaltene Danke: 45

Windows 8.1
Delphi XE4
BeitragVerfasst: Mo 22.05.06 14:53 
automatisch zum Cursor in TMemo scrollen lassen?

Mit der folgenden Procedure ist es möglich den Text in einem Memofeld automatisch so scrollen zu lassen, dass der Cursor zu sehen ist:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
procedure ViewMemoCursor (aMemo: TCustomMemo);
begin
  SendMessage (aMemo.Handle, EM_SCROLLCARET, 00);
end;


Verwandte Beiträge:

Moderiert von user profile iconjasocul: Beitrag geprüft am 22.05.2006