* Fixed a bug introduced in 312

* Fixed clicking past the right of a item

1 files changed, 6 insertions, 3 deletions

diff --git a/src/gui/gui_listview.pas b/src/gui/gui_listview.pas
index 94847ed6..509fcdbc 100644
--- a/src/gui/gui_listview.pas
+++ b/src/gui/gui_listview.pas
@@ -712,6 +712,8 @@ begin
     Exit;
   if Index >= FItems.Count then
     Exit;
+  if FHScrollBar.Position - 2 + X > GetVisibleColumnsWidth then
+    Exit;
 
   Result := FItems.Item[Index];
 end;
@@ -901,10 +903,11 @@ begin
         end;
         LastColumn := Column;
       end;
+      if not Assigned(FResizingColumn) and Assigned(LastColumn) and LastColumn.Resizable then
+        if (HeaderX - curLeft) < 5 then
+          FResizingColumn := LastColumn;
     end;
-    if not Assigned(FResizingColumn) and Assigned(LastColumn) and LastColumn.Resizable then
-      if (HeaderX - curLeft) < 5 then
-        FResizingColumn := LastColumn;
+
     Inc(cRect.Top, HeaderHeight);
   end;