Functions.CompObj 方法 |
命名空间: XSharp.VFP
1lstMyList1 = CreateOBJ('ListBox') // 创建一个ListBox 2lstMyList2 = CreateOBJ('ListBox') // 创建第二个ListBox 3cmbMyCombo = CreateOBJ('ComboBox') // 创建一个ComboBox 4lstMyList1.Name = 'list1' 5lstMyList2.Name = 'list2' 6Clear 7? lstMyList1.Name // 显示List1的Name属性 8? lstMyList2.Name // 显示List2的Name属性 9? CompObj(lstMyList1, cmbMyCombo) // 显示.F. 10? CompObj(lstMyList1, lstMyList2) // 显示.F.,Name不同 11lstMyList2.Name = lstMyList1.Name 12? CompObj(lstMyList1, lstMyList2) // 显示.T.,属性相同