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

qt: implement theme drawing of combobox drop down arrow

Browse Source 
git-svn-id: trunk@24162 -
This commit is contained in:
paul 2010-03-22 04:27:46 +00:00
parent c93ed80353
commit c4b2012cf1
1 changed files with 13 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
lcl/interfaces/qt/qtthemes.pas
View File

@ -194,7 +194,10 @@ begin
QStyleOptionToolButton_setFeatures(QStyleOptionToolButtonH(opt), QStyleOptionToolButton_setFeatures(QStyleOptionToolButtonH(opt),
Element.Features); Element.Features);
end; end;
QStyleCC_ComboBox:
begin
opt := QStyleOptionComboBox_create();
end;
QStyleCC_TitleBar, QStyleCC_MdiControls: QStyleCC_TitleBar, QStyleCC_MdiControls:
begin begin
opt := QStyleOptionTitleBar_create(); opt := QStyleOptionTitleBar_create();
@ -468,6 +471,15 @@ begin
Result.SubControls := QStyleSC_GroupBoxFrame; Result.SubControls := QStyleSC_GroupBoxFrame;
end; end;
end; end;
teComboBox:
begin
if Details.Part = CP_DROPDOWNBUTTON then
begin
Result.DrawVariant := qdvComplexControl;
Result.ComplexControl := QStyleCC_ComboBox;
Result.SubControls := QStyleSC_ComboBoxArrow;
end;
end;
teHeader: teHeader:
begin begin
case Details.Part of case Details.Part of