Recent

Author Topic: VirtualTreeView 4.8.7 released  (Read 46455 times)

Shebuka

  • Sr. Member
  • ****
  • Posts: 427
Re: VirtualTreeView 4.8.7 released
« Reply #15 on: July 06, 2011, 06:57:15 pm »
Another problem related to CMMouseWheel and the latest Lazarus from Trunk (31572)

In new version of Lazarus 31572, SystemParametersInfo (in winapi.inc it's WidgetSet.SystemParametersInfo) points to carbonwinapi.inc in wich there is no case selector for SPI_GETWHEELSCROLLLINES so ScrollLines is always returned as 0 and you got no scrolling...

In Lazarus 30406, SystemParametersInfo was pointing to intfbasewinapi.inc which actually has selector for SPI_GETWHEELSCROLLLINES...

dunna know who must fix this, but for now this is my fix:
Code: Pascal  [Select][+][-]
  1. procedure TBaseVirtualTree.CMMouseWheel(var Message: TLMMouseEvent);
  2. ...
  3.           SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0, @ScrollLines, 0);
  4.           if ScrollLines = WHEEL_PAGESCROLL then
  5.             ScrollAmount := Trunc(WheelFactor * ClientHeight)
  6.           else if ScrollLines = 0 then
  7.             ScrollAmount := round(WheelFactor * Mouse.WheelScrollLines * FDefaultNodeHeight)
  8.           else
  9.             ScrollAmount := Trunc(WheelFactor * ScrollLines * FDefaultNodeHeight);  

Shebuka

  • Sr. Member
  • ****
  • Posts: 427
Re: VirtualTreeView 4.8.7 released
« Reply #16 on: November 22, 2011, 05:21:30 pm »
Hi, i make new developments on Mac OS X (found some bug, see bugtracker) and would like to ask, why in DragType dtVCL there is not generated a DragImage? Is there a way to make it work? (have see is source that DoDragging (wich has calls to generate the drag image) is only called if there is a OLE drag)

LuizAmérico

  • Sr. Member
  • ****
  • Posts: 457
Re: VirtualTreeView 4.8.7 released
« Reply #17 on: November 22, 2011, 11:21:27 pm »
In dtVcl its up to the widgetset draw the dragimage

Shebuka

  • Sr. Member
  • ****
  • Posts: 427
Re: VirtualTreeView 4.8.7 released
« Reply #18 on: November 23, 2011, 09:26:41 am »
In dtVcl its up to the widgetset draw the dragimage
Is this automatic or i must call some function or init something? Because with default options Carbon is not drawing anything...

Gustavo 'Gus' Carreno

  • Hero Member
  • *****
  • Posts: 1111
  • Professional amateur ;-P
Re: VirtualTreeView 4.8.7 released
« Reply #19 on: April 01, 2012, 07:05:20 pm »
Quote
Are plans for 64 bit?

The trunk should work with 64bit (not tested by me)

I've just installed VTV from Trunk and it compiles. I've had to use lclextensions from trunk also.

Will report any issues under amd64.

Cheers,
Gus
Lazarus 3.99(main) FPC 3.3.1(main) Ubuntu 23.10 64b Dark Theme
Lazarus 3.0.0(stable) FPC 3.2.2(stable) Ubuntu 23.10 64b Dark Theme
http://github.com/gcarreno

esvignolo

  • Full Member
  • ***
  • Posts: 159
  • Using FPC in Windows, Linux, Macos
Re: VirtualTreeView 4.8.7 released
« Reply #20 on: January 28, 2014, 03:11:24 pm »
Hi, i make new developments on Mac OS X (found some bug, see bugtracker) and would like to ask, why in DragType dtVCL there is not generated a DragImage? Is there a way to make it work? (have see is source that DoDragging (wich has calls to generate the drag image) is only called if there is a OLE drag)

Hi Shebuka, i have some troubles using VTV in macos, have you a new source for mac?

MISV

  • Hero Member
  • *****
  • Posts: 783
Re: VirtualTreeView 4.8.7 released
« Reply #21 on: July 17, 2015, 04:09:58 pm »
There's still a scrolbar problem on Carbon where the treeview does not update (at least on horizontal scrolling)

I am looking into it right now, if anyone has some ideas they want me to test and report back, let me know!

eny

  • Hero Member
  • *****
  • Posts: 1634
Re: VirtualTreeView 4.8.7 released
« Reply #22 on: July 17, 2015, 06:10:26 pm »
There's still a scrolbar problem on Carbon where the treeview does not update (at least on horizontal scrolling)

I am looking into it right now, if anyone has some ideas they want me to test and report back, let me know!
Useful update on a 1.5y old thread
All posts based on: Win10 (Win64); Lazarus 2.0.10 'stable' (x64) unless specified otherwise...

MISV

  • Hero Member
  • *****
  • Posts: 783
Re: VirtualTreeView 4.8.7 released
« Reply #23 on: July 17, 2015, 09:35:23 pm »
It is better than creating a new thread on the same topic. Infact this thread is linked in the Lazarus documentation for virtual treeview. Seeing as tthis is a major component and scrolling is rather important - I think it useful to use tthis thread as reference point.

LuizAmérico

  • Sr. Member
  • ****
  • Posts: 457
Re: VirtualTreeView 4.8.7 released
« Reply #24 on: July 20, 2015, 10:56:56 pm »
If someone with a Mac could run the test app and put the output screenshot in the bug report it would help a lot:

http://bugs.freepascal.org/view.php?id=25564

MISV

  • Hero Member
  • *****
  • Posts: 783
Re: VirtualTreeView 4.8.7 released
« Reply #25 on: August 25, 2015, 10:59:49 pm »
Did not see this before now. I will first have my Mac back in a week, but I will do it then.

(I can confirm I am otherwise seeing the same as the youtube video, but I have not tested the test app yet)

MISV

  • Hero Member
  • *****
  • Posts: 783
Re: VirtualTreeView 4.8.7 released
« Reply #26 on: September 16, 2015, 11:54:27 am »
Here - uploaded to tracker as well

It would be great if this issue could be solved in virtual string tree - hopefully this helps, else let me know if you need me to test anything else!

MISV

  • Hero Member
  • *****
  • Posts: 783
Re: VirtualTreeView 4.8.7 released
« Reply #27 on: September 16, 2015, 05:48:28 pm »
Code: Pascal  [Select][+][-]
  1. procedure TBaseVirtualTree.CMMouseWheel(var Message: TLMMouseEvent);
  2. ...
  3.           SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0, @ScrollLines, 0);
  4.           if ScrollLines = WHEEL_PAGESCROLL then
  5.             ScrollAmount := Trunc(WheelFactor * ClientHeight)
  6.           else if ScrollLines = 0 then
  7.             ScrollAmount := round(WheelFactor * Mouse.WheelScrollLines * FDefaultNodeHeight)
  8.           else
  9.             ScrollAmount := Trunc(WheelFactor * ScrollLines * FDefaultNodeHeight);  
[/quote]

Checking the trunk your fix does not seem to be part of it
https://svn.code.sf.net/p/lazarus-ccr/svn/components/virtualtreeview-new/trunk/VirtualTrees.pas

Does anyone know what the state is? Are there fixes in this thread not implemented yet for virtual treeview? (It is a pretty major problem hat horizontal scrolling does not work in virtual treeview - interestingly there are under some conditions where it does work)

LuizAmérico

  • Sr. Member
  • ****
  • Posts: 457
Re: VirtualTreeView 4.8.7 released
« Reply #28 on: September 17, 2015, 03:44:02 pm »

MISV

  • Hero Member
  • *****
  • Posts: 783
Re: VirtualTreeView 4.8.7 released
« Reply #29 on: September 18, 2015, 02:09:43 am »
Let me know if you need me to test code on OSX - provide screenshots or similar.

 

TinyPortal © 2005-2018