Recent

Author Topic: [SOLVED] TMemo scrolling issue  (Read 231 times)

trev

  • Full Member
  • ***
  • Posts: 101
[SOLVED] TMemo scrolling issue
« 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
« Last Edit: June 22, 2019, 11:50:47 am by trev »
o Lazarus v2.1.0 r61574, FPC v3.3.1, macOS 10.14.5
o Lazarus v2.0.0, FPC v3.0.4, FreeBSD 12.0
o Lazarus v2.1.0 r61574, FPC v3.0.4, Ubuntu 18.04

skalogryz

  • Global Moderator
  • Hero Member
  • *****
  • Posts: 2170
    • havefunsoft.com
Re: TMemo scrolling issue
« Reply #1 on: June 21, 2019, 04:39:06 pm »
try r61438
Patron Cocoa Widgetset development https://www.patreon.com/skalogryz

trev

  • Full Member
  • ***
  • Posts: 101
Re: [SOLVED] TMemo scrolling issue
« Reply #2 on: June 22, 2019, 02:52:55 am »
Thanks Dmitry! It now works as expected  8-)
o Lazarus v2.1.0 r61574, FPC v3.3.1, macOS 10.14.5
o Lazarus v2.0.0, FPC v3.0.4, FreeBSD 12.0
o Lazarus v2.1.0 r61574, FPC v3.0.4, Ubuntu 18.04

skalogryz

  • Global Moderator
  • Hero Member
  • *****
  • Posts: 2170
    • havefunsoft.com
Re: [SOLVED] TMemo scrolling issue
« Reply #3 on: June 22, 2019, 03:36:29 am »
thank you! the more you find, the better the widgetset overall
Patron Cocoa Widgetset development https://www.patreon.com/skalogryz