I want to set the width of a combo in code. I have the following code:

The width of the drop down section is wider than the control. How can
I can I make it equal to the width of the control?

WITH ThisForm.combo1

  .ColumnCount = 2
  .ColumnWidths = TRANSFORM(.Width) + ",0"
  .ColumnLines = .F.
	
  .AddListItem("One", 1, 1)
  .AddListItem("One1", 1, 2)
	
  .AddListItem("Two", 2, 1)
  .AddListItem("Two2", 2, 2)

  .AddListItem("Three", 3, 1)
  .AddListItem("Three3", 3, 2)

ENDWITH

RETURN