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

Qt, Qt5: fixed selection with TListView. issue #31595

Browse Source 
git-svn-id: trunk@54694 -
This commit is contained in:
zeljko 2017-04-23 10:36:07 +00:00
parent e96ede4637
commit 17a13c6d81
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/qt/qtwidgets.pas
View File

@ -13040,7 +13040,7 @@ begin
SlotMouse(Sender, Event); SlotMouse(Sender, Event);
HandleCheckChangedEvent(MousePos, Item, Event); HandleCheckChangedEvent(MousePos, Item, Event);
if not QListWidgetItem_isSelected(Item) then if not QListWidgetItem_isSelected(Item) then
QListWidget_setCurrentItem(QListWidgetH(Widget), Item, QItemSelectionModelSelect); QListWidget_setCurrentItem(QListWidgetH(Widget), Item, QItemSelectionModelClearAndSelect);
QEvent_ignore(Event); QEvent_ignore(Event);
Result := True; Result := True;
exit; exit;

2
lcl/interfaces/qt5/qtwidgets.pas
View File

@ -13015,7 +13015,7 @@ begin
SlotMouse(Sender, Event); SlotMouse(Sender, Event);
HandleCheckChangedEvent(MousePos, Item, Event); HandleCheckChangedEvent(MousePos, Item, Event);
if not QListWidgetItem_isSelected(Item) then if not QListWidgetItem_isSelected(Item) then
QListWidget_setCurrentItem(QListWidgetH(Widget), Item, QItemSelectionModelSelect); QListWidget_setCurrentItem(QListWidgetH(Widget), Item, QItemSelectionModelClearAndSelect);
QEvent_ignore(Event); QEvent_ignore(Event);
Result := True; Result := True;
exit; exit;