FMX Memo still not right regarding scrolling

FMX TMS FMX UI Pack
1
Sometimes it shows only little more than 1/2 of the lines when using the thumb to scroll (there are 1000 lines in that text file):



And sometimes it shows more lines than it should. There are exact 1000 lines, no cr/lf after, and it should not scroll to 1002:



2

Hi, 


Can you send us the text file so we can investigate here what is going wrong?
3

Its not a specific text file, but I will try to get it from the user. Might take 1-2 days.

4

Additionally, it scrolls opposite (Mac). Moving the mouse wheel down scrolls up and opposite.

5

Hi, 


We have applied a fix for the mouse wheel scrolling, the next version will address this.
6

And when will the next version be released? I sure cant have my customer wait long... or is there any patch I can apply for the meantime?

7
The fix is to remove the wd := -wd in the MouseWheel event handler.
This was added as this was a fix introduced in older versions of RAD Studio to reverse the mouse wheel scrolling.

procedure TTMSFMXMemo.MouseWheel(Shift: TShiftState;
  WheelDelta: Integer; var Handled: Boolean);
var
  vs: TScrollBar;
  n, wd: Integer;
begin
  inherited;

  wd := WheelDelta;

  {$IFDEF MACOS}
  wd := -wd;
  {$ENDIF}

  if Assigned(FVertScrollBar) then
    vs := FVertScrollBar
  else
    vs := GetVScroll;
  if Assigned(vs) and (wd <> 0) and vs.Visible then
  begin
    n := Round(LocalRect.Height / FCellSize.H) div 2;
    if wd > 0 then
      n := -n;
    vs.Value := FTopLine + n;
  end;
end;
8

Ok, thank you, it works now :)

9

Hi,

How can I fix this issue by modifying the TMS source code?
Should I re-compile it? And how to install to C++ Builder?

I only have C++ Builder standalone version.

Thanks!
10

Hi, 


For C++Builder please await the next version, which will fix this issue.