Modificar ancho en un combobox al desplegarse

[Bicho]

Simplemente poniendo esto podemos conseguir que un combobox tenga distinto ancho al desplegarse


procedure TForm1.Button1Click(Sender: TObject);
var
Ancho: integer;
begin
Ancho:=300;
ComboBox1.Perform(CB_SetDroppedWidth,Ancho,0);
end;

[papulo]

Excelente código, he tardado un suspiro en implementarlo en mis cBox y queda efectivo.

Gracias por la ayuda.

[LordVermiis]

Mira que no he buscado yo esto, y era así de facil. Muchas gracias por la ayuda.