LCL: Fix TComboExItems.Insert. Issue #29302.

git-svn-id: trunk@51106 -
This commit is contained in:
juha 2016-01-01 14:17:37 +00:00
parent 476bc7e244
commit aff098bce4

View File

@ -1,4 +1,4 @@
{%MainUnit comboex.pas} {%MainUnit ../comboex.pas}
{***************************************************************************** {*****************************************************************************
TCustomComboBoxEx, TCustomCheckComboBox TCustomComboBoxEx, TCustomCheckComboBox
@ -217,7 +217,7 @@ end;
function TComboExItems.Insert(AIndex: Integer): TComboExItem; function TComboExItems.Insert(AIndex: Integer): TComboExItem;
begin begin
Result:=Insert(AIndex); Result := TComboExItem(inherited Insert(AIndex));
end; end;
procedure TComboExItems.Notify(Item: TCollectionItem; Action: TCollectionNotification); procedure TComboExItems.Notify(Item: TCollectionItem; Action: TCollectionNotification);