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

Object Inspector: Set ComboBox editor's ItemHeight again. Lazarus built with QT crashes otherwise when Color combobox list is opened.

Browse Source 
git-svn-id: trunk@46966 -
This commit is contained in:
juha 2014-11-22 18:43:13 +00:00
parent 00e70eb738
commit 686309b70a
1 changed files with 5 additions and 2 deletions

7
components/ideintf/objectinspector.pp
View File

@ -2632,8 +2632,11 @@ begin
if not CompareTopLeft(FCurrentEdit.BoundsRect,EditCompRect) then
begin
FCurrentEdit.BoundsRect:=EditCompRect;
// if FCurrentEdit is TComboBox then
// TComboBox(FCurrentEdit).ItemHeight:=EditCompRect.Bottom-EditCompRect.Top-6;
// If ItemHeight is not set, Lazarus built with QT crashes
// when Color combobox list is opened. Why is that?
if FCurrentEdit is TComboBox then
TComboBox(FCurrentEdit).ItemHeight:=EditCompRect.Bottom-EditCompRect.Top-6;
//
FCurrentEdit.Invalidate;
end;
end;