Lazarus

Programming => General => Topic started by: pcurtis on September 22, 2020, 10:03:57 am

Title: [solved] RichMemo - Deadspace
Post by: pcurtis on September 22, 2020, 10:03:57 am
Hi All,

this not necessarily a FPC problem, but when I put a Richmemo on a form and fill it with the following sample code

Code: Pascal  [Select][+][-]
  1.   FontParams.Size := 24;
  2.   FontParams.Color := clTeal;
  3.   FontParams.Style := [fsBold, fsUnderline];
  4.   FontParams.Name := 'Segoe UI';
  5.   str := FormatDateTime('dddd mmmm dd yyyy  hh:mm', Now) + LineEnding;
  6.   InsertFontText(RichMemo1, str, FontParams, -1);
  7.   RichMemo1.SelStart := Length(RichMemo1.Lines.Text);
  8.  

I get the following result (see attachment). Is there a way to remove the dead space at the top of the RichMemo?

Thanks in advance.
TinyPortal © 2005-2018