Combobox.DropDownCount

Hello,

on AdvStringGrid.GetEditorType and AEditor := edComboEdit the property ComboBox.DropDownCount has no effect, there are even eight entries (default) in the list. How can i change the number of entries?

Best regards
Marco

Retested with the latest version / default grid on the form and code:


procedure TForm1.AdvStringGrid1GetEditorProp(Sender: TObject; ACol,
  ARow: Integer; AEditLink: TEditLink);
var
  i: integer;
begin
  AdvStringGrid1.ClearComboString;
  for i := 0 to 20 do
    AdvStringGrid1.AddComboString('item ' + inttostr(i));
end;

procedure TForm1.AdvStringGrid1GetEditorType(Sender: TObject; ACol,
  ARow: Integer; var AEditor: TEditorType);
begin
  AEditor := edComboEdit;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  advstringgrid1.ControlLook.DropDownCount := 20;
  advstringgrid1.Options := advstringgrid1.Options + [goEditing];
end;

and this shows 20 items in the dropdown.