>>Hi everybody,
>>
>>Is there any way to control the width of the drop down portion of combobox? I'd like it to be the exact width as my combobox width is. How can I achieve it besides experimenting and adjusting?
>>
>>Thanks in advance.
>
>How does VFP control this internally? I have two comboboxes based on the same class, on the same field, which is 100 chars lons. However, the drop down portion in one combo is different than it's in another combo. I use the default non-proportional font, I don't want to switch to another font. Am I out of luck?
>
>Thanks.

run and resize the form

PUBLIC oform1

oform1=NEWOBJECT("form1")
oform1.Show
RETURN

DEFINE CLASS form1 AS form


	Height = 250
	Width = 136
	DoCreate = .T.
	Caption = "Form1"
	Name = "Form1"


	ADD OBJECT combo1 AS combobox WITH ;
		ColumnCount = 2, ; && it has to be upper to 1
		RowSourceType = 1, ;
		RowSource = "aaaaaaaaaaaaaa1,,bbbbbbbbbb2,,cc3", ;
		ColumnLines = .F., ;
		Left = 12, ;
		Top = 28, ;
		Width = 100, ;
		Name = "Combo1"


	PROCEDURE combo1.DropDown
		this.ColumnWidths = LTRIM(STR(this.Width-23))+',0'
	ENDPROC

	PROCEDURE resize
		this.combo1.width=MAX(0, this.width-24)
ENDDEFINE