Carbon: set SM_CYMENU in GetSystemMetrics as 0, so we don't return DebugLn TODO in that case. Under mac menu isn't part of form, so 0.

git-svn-id: trunk@35885 -
This commit is contained in:
zeljko 2012-03-11 13:53:25 +00:00
parent 6acda204b2
commit 0c4d7c8009

View File

@ -2037,6 +2037,7 @@ begin
Result := GetCarbonThemeMetric(kThemeMetricTitleBarControlsHeight);
Result := Result + (Result div 2) + 1;
end;
SM_CYMENU: Result := 0;
else
DebugLn('TCarbonWidgetSet.GetSystemMetrics TODO ', DbgS(NIndex));;
end;