Добрый день.
В приложении использую UniCombobox
object cbDocTypes: TUniComboBox
Left = 162
Top = 20
Width = 303
Height = 27
Hint = ''
Style = csDropDownList
MaxLength = 5
Text = ''
ParentFont = False
Font.Height = -16
TabOrder = 7
ClientEvents.UniEvents.Strings = (
'beforeInit=function beforeInit(sender, config)'#13#10'{'#13#10' config.li' +
'stConfig = {'#13#10' maxHeight: 100 //default 300'#13#10' }'#13#10'}')
RemoteQuery = True
IconItems = <>
end
при создании формы заполняю список, там всего 3 позиции
cbDocTypes.Items.Clear;
if fMChild.UniPageControl1.ActivePage = fMChild.uniTabSheet2
then begin
cbDocTypes.Items.AddObject('Обращение', Pointer(0));
cbDocTypes.Items.AddObject('Ответ филиала', Pointer(1));
cbDocTypes.Items.AddObject('Договор', Pointer(2));
end
else begin
cbDocTypes.Items.AddObject('Обращение', Pointer(0));
cbDocTypes.Items.AddObject('Ответ филиала', Pointer(1));
cbDocTypes.Items.AddObject('Соглашение', Pointer(3));
end;
В режиме Runtime, раскрывая список его высота слишком велика (примерно на 20 позиций.) Непонятно, почему так - ведь при создании объекта указывается принудительно maxHeight: 100, но не работает.