Cómo dejar desplegado un ComboBox e inmovil?

[ecfisa]

Hola de nuevo.

Me quedé con dudas sobre la capacidad del Combo he hice una prueba:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  for i:= 0 to 86000 do
  try
    ComboBox1.Items.Add('ABCDEFGHIJKLMNOPQRSTUVWXYZ');
  except
    ShowMessage(IntToStr(i));
  end;
end;

Tardó en llenarlo, pero no provocó excepción... ¿ Estas seguro que son sólo 6700 items ?

Saludos.