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

Merged revision(s) 54802 #ef647d8160 from trunk:

Browse Source 
Qt,Qt5: fixed regression from r54696 #d76aa4f29a. issue #31697
........

git-svn-id: branches/fixes_1_8@54805 -
This commit is contained in:
maxim 2017-05-02 22:37:55 +00:00
parent b4ddf13b57
commit 8a85928884
2 changed files with 0 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -13999,11 +13999,6 @@ begin
Msg.Msg := LM_CHANGED; Msg.Msg := LM_CHANGED;
Msg.WParam := PtrInt(QListWidget_row(QListWidgetH(Widget), Item)); Msg.WParam := PtrInt(QListWidget_row(QListWidgetH(Widget), Item));
DeliverMessage(Msg); DeliverMessage(Msg);
if (QtVersionMajor = 4) and (QtVersionMinor >= 8) then
begin
QListWidget_setCurrentItem(QListWidgetH(Widget), Item, QItemSelectionModelSelectCurrent);
inherited signalSelectionChanged();
end;
end; end;
function TQtCheckListBox.GetItemCheckState(AIndex: Integer): QtCheckState; function TQtCheckListBox.GetItemCheckState(AIndex: Integer): QtCheckState;

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

@ -13971,8 +13971,6 @@ begin
Msg.Msg := LM_CHANGED; Msg.Msg := LM_CHANGED;
Msg.WParam := PtrInt(QListWidget_row(QListWidgetH(Widget), Item)); Msg.WParam := PtrInt(QListWidget_row(QListWidgetH(Widget), Item));
DeliverMessage(Msg); DeliverMessage(Msg);
QListWidget_setCurrentItem(QListWidgetH(Widget), Item, QItemSelectionModelSelectCurrent);
inherited signalSelectionChanged();
end; end;
function TQtCheckListBox.GetItemCheckState(AIndex: Integer): QtCheckState; function TQtCheckListBox.GetItemCheckState(AIndex: Integer): QtCheckState;