Overwriting on Listboxes

I think I see.... Edit: Didn't work. Here's the code.

	Local LoopFunctionsPanel:TGadget = CreatePanel(0, 0, ClientWidth(WindowTabber), ClientHeight(WindowTabber), WindowTabber, PANEL_ACTIVE) 
	Local LoopFunctionsLabel:TGadget = CreateLabel("Loop Functions", 0, 0, ClientWidth(WindowTabber), 20, LoopFunctionsPanel, LABEL_CENTER) 
	Local LoopFunctionsList:TGadget = CreateListBox(10, 30, ClientWidth(WindowTabber) - 20, ClientHeight(WindowTabber) - 70, LoopFunctionsPanel) 
	Local LoopFunctionsOkButton:TGadget = CreateButton("Ok", 10, ClientHeight(WindowTabber) - 30, ClientWidth(WindowTabber) - 20, 20, LoopFunctionsPanel) 
	Local ManualLoopFunctionListPanel:TGadget = CreatePanel(0, 0, ClientWidth(WindowTabber), ClientHeight(WindowTabber), WindowTabber, PANEL_ACTIVE) 
	Local ManualCreateMenu:TGadget = CreateMenu("Create", 2, WindowTabber) 
	CreateMenu("New", 1200, ManualCreateMenu) 
	

and here's where I test for it.

				If EventSource() = ManualLoopFunctionListPanel Or EventSource() = LoopFunctionsPanel
					If EventData() = 2 Then
						PopupWindowMenu MainWindow, ManualCreateMenu
					EndIf
				EndIf