Scalabium Software
Knowledge for your independence'.
Home Delphi and C++Builder tips

#102: How can I scroll a text in memo in the run-time?

In few tasks I needs to add a some strings in end of TMemo in run-time but after that I must show a first strings. For example, it's very useful in logging system when you inserted a lot of status messages but user must view a first lines.

This task can be solved in two lines of code:

  <.. to add a lines ..>
  {set a current position of cursor to start}
  SendMessage(Memo1.Handle, EM_SETSEL, 0, 0);

  {scroll a memo to start position}
  SendMessage(Memo1.Handle, EM_SCROLLCARET, 0, 0);

As alternative method you can set a Memo1.Visible := False before insertion of new strings and after that to set a Memo1.Visible := True. You'll receive a same result.

Published: October 26, 2000

See also

	Clarion Viewer
	SMDBGrid
	DBISAM Password Recovery
	Mail parser (ActiveX)
	ExcelFile Viewer
	SMImport suite
	SMMsg suite
	Database Information Manager
	SMReport
	Clarion to Text converter

Contact to webmaster