paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-08 00:02:03 +02:00
Code Issues Packages Projects Releases Wiki Activity

Gtk2: include scrollbars offset in TGtk2WSCustomListView.getItemAt(). issue #26767

Browse Source 
git-svn-id: trunk@46307 -
This commit is contained in:
zeljko 2014-09-24 06:15:57 +00:00
parent 549845087a
commit 89f68bf251
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/interfaces/gtk2/gtk2wscustomlistview.inc
View File

@ -1869,7 +1869,8 @@ begin
else
if GTK_IS_ICON_VIEW(Widgets^.MainView) then
begin
ItemPath := gtk_icon_view_get_path_at_pos(PGtkIconView(Widgets^.MainView), x, y);
ItemPath := gtk_icon_view_get_path_at_pos(PGtkIconView(Widgets^.MainView),
x + Widgets^.ScrollingData.HValue, y + Widgets^.ScrollingData.VValue);
if ItemPath <> nil then
begin
Result := gtk_tree_path_get_indices(ItemPath)^;