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

Qt: always recreateWnd when imagelist is set on TListView.

Browse Source 
git-svn-id: trunk@46854 -
This commit is contained in:
zeljko 2014-11-15 11:07:30 +00:00
parent 591d6edbff
commit b2498d731f
1 changed files with 1 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lcl/interfaces/qt/qtwscomctrls.pp
View File

@ -1988,18 +1988,9 @@ end;
class procedure TQtWSCustomListView.SetImageList(const ALV: TCustomListView; class procedure TQtWSCustomListView.SetImageList(const ALV: TCustomListView;
const AList: TListViewImageList; const AValue: TCustomImageList); const AList: TListViewImageList; const AValue: TCustomImageList);
var
QtListWidget: TQtListWidget;
begin begin
if not WSCheckHandleAllocated(ALV, 'SetImageList') then if not WSCheckHandleAllocated(ALV, 'SetImageList') then
Exit; Exit;
if not IsIconView(ALV) then
exit;
QtListWidget := TQtListWidget(ALV.Handle);
// issue #26770 , imediatelly apply changes.
if TViewStyle(QtListWidget.ViewStyle) in [vsIcon, vsSmallIcon] then
RecreateWnd(ALV); RecreateWnd(ALV);
end; end;