>>>Looks like a bug to me. It's even more visible when you make listbox the same size as editbox an put them side by side.
>>
>>i Agree,
>>if you reduce the form height slowly, you can see another bug:
>>the ListBox is draw badly, and a little rectangle is draw out of
>>the container.
>
>I see that with EditBox but not with a ListBox.

run this:

PUBLIC oform1

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

DEFINE CLASS form1 AS form


	Top = 0
	Left = 0
	Height = 204
	Width = 375
	DoCreate = .T.
	Caption = "Form1"
	Name = "Form1"


	ADD OBJECT container1 AS container1 WITH ;
		Anchor = 15, ;
		Top = 4, ;
		Left = 24, ;
		Width = 116, ;
		Height = 60, ;
		Name = "Container1"

	ADD OBJECT container2 AS container2 WITH ;
		Anchor = 15, ;
		Top = 4, ;
		Left = 188, ;
		Width = 116, ;
		Height = 60, ;
		Name = "Container2"

	PROCEDURE Activate
		FOR k=thisform.Height TO 100 STEP -1
		  thisform.Height = m.k
		  INKEY(0.05)
		NEXT
	
ENDDEFINE

DEFINE CLASS container1 AS container

	ADD OBJECT edit1 AS editbox WITH ;
		FontSize = 14, ;
		Anchor = 15, ;
		Height = 54, ;
		Left = 8, ;
		Top = 3, ;
		Width = 100, ;
		IntegralHeight = .T., ;
		Name = "Edit1"

ENDDEFINE

DEFINE CLASS container2 AS container

	ADD OBJECT list1 AS listbox WITH ;
		FontSize = 14, ;
		Anchor = 15, ;
		Height = 54, ;
		Left = 8, ;
		Top = 3, ;
		Width = 100, ;
		IntegralHeight = .T., ;
		Name = "List1"

ENDDEFINE