mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-17 17:59:16 +02:00
Qt: implemented SM_CXHTHUMB and SM_CYHTHUMB system metrics.
git-svn-id: trunk@35313 -
This commit is contained in:
parent
7fc44ac9f8
commit
5f6f0a50ed
@ -3770,9 +3770,10 @@ begin
|
||||
begin
|
||||
//DebugLn('Trace:TODO: [TQtWidgetSet.GetSystemMetrics] --> SM_CYFULLSCREEN ');
|
||||
end;
|
||||
SM_CXHTHUMB:
|
||||
SM_CXHTHUMB,
|
||||
SM_CYVTHUMB:
|
||||
begin
|
||||
//DebugLn('Trace:TODO: [TQtWidgetSet.GetSystemMetrics] --> SM_CXHTHUMB ');
|
||||
Result := GetPixelMetric(QStylePM_ScrollBarSliderMin, nil, nil);
|
||||
end;
|
||||
SM_CXICON,
|
||||
SM_CYICON:
|
||||
@ -3910,10 +3911,6 @@ begin
|
||||
begin
|
||||
//DebugLn('Trace:TODO: [TQtWidgetSet.GetSystemMetrics] --> SM_CYSMCAPTION ');
|
||||
end;
|
||||
SM_CYVTHUMB:
|
||||
begin
|
||||
//DebugLn('Trace:TODO: [TQtWidgetSet.GetSystemMetrics] --> SM_CYVTHUMB ');
|
||||
end;
|
||||
SM_DBCSENABLED:
|
||||
begin
|
||||
//DebugLn('Trace:TODO: [TQtWidgetSet.GetSystemMetrics] --> SM_DBCSENABLED ');
|
||||
|
Loading…
Reference in New Issue
Block a user