function DeleteItemsRepeat(strObject)
	local tLBOut = {};
	local nLBcnt = ListBox.GetCount(strObject);
	for x = 1,nLBcnt do
		local sLBText = ListBox.GetItemText(strObject, x);
		local sLBData = ListBox.GetItemData(strObject, x);
		tLBOut[sLBText] = {data=sLBData};	
	end
	ListBox.DeleteItem(strObject, LB_ALLITEMS);
	for i,v in pairs(tLBOut) do
		ListBox.AddItem(strObject, i, tLBOut[i]["data"]);
	end
end