Hi Nancy:

On first run, AddItem = 1.011 and AddListItem = 2.114
Second run, 1.034 and 1.533 respectively.

So AddListItem is slower.....is that what you were looking for?




>I compared the two methods for populating a combobox. The question came up in [Visual FoxPro in general] How can I using code to add data into 2 column list box? Thread #299032.
>
>I benchmarked the two methods using the following code, and I'd appreciate it if someone would care to confirm or correct my findings. Thanks.

>*!* This is a running example of the two ways to add items to multicolumn combos WITH benchmarks.
>
>ox = CreateObject( 'multicolumncombo' )
>ox.show()
>READ EVENTS
>CLEAR EVENTS
>**************************************************
>*-- Class:        multicolumncombo (c:\development\misc\examples.vcx)
>*-- ParentClass:  form
>*-- BaseClass:    form
>*-- Time Stamp:   12/06/99 08:57:01 AM
>*
>DEFINE CLASS multicolumncombo AS form
>
>
>	DoCreate = .T.
>	Caption = "Form1"
>	elapsed1 = 0
>	elapsed2 = 0
>	Name = "multicolumncombo"
>
>
>	ADD OBJECT combo1 AS combobox WITH ;
>		Height = 24, ;
>		Left = 50, ;
>		Top = 22, ;
>		Width = 100, ;
>		Name = "Combo1"
>
>
>	ADD OBJECT combo2 AS combobox WITH ;
>		Height = 24, ;
>		Left = 50, ;
>		Top = 79, ;
>		Width = 100, ;
>		Name = "Combo2"
>
>
>	ADD OBJECT text1 AS textbox WITH ;
>		Value = "ln1", ;
>		ControlSource = "thisform.elapsed1", ;
>		Height = 23, ;
>		Left = 165, ;
>		Top = 22, ;
>		Width = 100, ;
>		Name = "Text1"
>
>
>	ADD OBJECT text2 AS textbox WITH ;
>		Value = "ln2", ;
>		ControlSource = "thisform.elapsed2", ;
>		Height = 23, ;
>		Left = 165, ;
>		Top = 79, ;
>		Width = 100, ;
>		Name = "Text2"
>
>
>	ADD OBJECT label1 AS label WITH ;
>		BackStyle = 0, ;
>		Caption = "Using AddItem()", ;
>		Height = 17, ;
>		Left = 50, ;
>		Top = 7, ;
>		Width = 91, ;
>		Name = "Label1"
>
>
>	ADD OBJECT label2 AS label WITH ;
>		BackStyle = 0, ;
>		Caption = "Using AddListItem", ;
>		Height = 17, ;
>		Left = 50, ;
>		Top = 63, ;
>		Width = 103, ;
>		Name = "Label2"
>
>
>	ADD OBJECT label3 AS label WITH ;
>		BackStyle = 0, ;
>		Caption = "Elapsed Time", ;
>		Height = 17, ;
>		Left = 165, ;
>		Top = 7, ;
>		Width = 79, ;
>		Name = "Label3"
>
>
>	ADD OBJECT label4 AS label WITH ;
>		BackStyle = 0, ;
>		Caption = "Elapsed Time", ;
>		Height = 17, ;
>		Left = 165, ;
>		Top = 63, ;
>		Width = 79, ;
>		Name = "Label4"
>
>
>	PROCEDURE combo1.Init
>		PUBLIC ln1
>		LOCAL lni
>		ln1 = SECONDS()
>		WITH this
>			.ColumnCount = 2
>			.ColumnWidths = '100,100'
>
>			FOR lni = 1 TO 1000
>
>				.AddItem( 'Color' )
>				.List( .ListCount, 2) = 'Red'
>
>				.AddItem( 'Style' )
>				.List( .ListCount, 2) = 'Dress'
>
>				.AddItem( 'Size' )
>				.List( .ListCount, 2) = 'Medium'
>
>			NEXT lni
>		ENDWITH
>		ln1 = SECONDS() - ln1
>		RETURN .T.
>	ENDPROC
>
>
>	PROCEDURE combo2.Init
>		PUBLIC ln2
>		LOCAL lni
>		ln2 = SECONDS()
>		WITH this
>
>			.ColumnCount = 2
>			.ColumnWidths = '100,100'
>
>			FOR lni = 1 TO 1000
>
>				.AddListItem( 'Color', .NewItemID + 1, 1 )
>				.AddListItem( 'Red', .NewItemID , 2 )
>
>				.AddListItem( 'Style', .NewItemID + 1, 1 )
>				.AddListItem( 'Dress', .NewItemID , 2 )
>
>				.AddListItem( 'Size', .NewItemID + 1, 1 )
>				.AddListItem( 'Medium', .NewItemID , 2 )
>
>			NEXT lni
>
>		ENDWITH
>		ln2 = SECONDS() - ln2
>		RETURN .T.
>	ENDPROC
>
>
>	PROCEDURE text1.Init
>		this.value = ln1
>		this.refresh()
>	ENDPROC
>
>
>	PROCEDURE text2.Init
>		this.value = ln2
>		this.refresh()
>	ENDPROC
>
>
>ENDDEFINE
>*
>*-- EndDefine: multicolumncombo
>**************************************************