VCL Delphi

//drony@mynet.com
//icq:266148308
procedure TComboForm.ComboBoxDropDown(Sender: TObject);
begin
{ Set the #### value to the drop down size width}
ComboBox.Perform(CB_SETDROPPEDWIDTH, {####} 250, 0);
end;