Lazarus

Programming => Widgetset => Cocoa => Topic started by: trev on June 21, 2019, 12:06:52 pm

Title: [SOLVED] TMemo scrolling issue
Post by: trev on June 21, 2019, 12:06:52 pm

Code: Pascal  [Select][+][-]

1.       // select characters to highlight
2.       Memo.SelStart := PosEx(UpperCase(Edit.Text), UpperCase(Memo.Text), searchOFS) - 1;
3.       Memo.SelLength := Length(Edit.Text);  
4.  

This does not scroll the relevant text into the viewable TMemo window. In fact, it has no effect - no scrolling at all :( The highlighting does work :)

Sample project showing issue attached. Lazarus and OS details vvvvv below vvvvv

Title: Re: TMemo scrolling issue
Post by: skalogryz on June 21, 2019, 04:39:06 pm

try r61438

Title: Re: [SOLVED] TMemo scrolling issue
Post by: trev on June 22, 2019, 02:52:55 am

Thanks Dmitry! It now works as expected  8-)

Title: Re: [SOLVED] TMemo scrolling issue
Post by: skalogryz on June 22, 2019, 03:36:29 am

thank you! the more you find, the better the widgetset overall