"Bad refs" error in output screen, MaxGUI

BlitzMax Forums/BlitzMax Programming/"Bad refs" error in output screen, MaxGUI

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

Fry Crayola
 #1
Ok, I've isolated a smaller chunk of the code. It's to do with Tabbers or panels, really.

MainTabber = CreateTabber(5, 55, ClientWidth(MainWindow) - 10, ClientHeight(MainWindow) - 60, MainWindow)
AddGadgetItem(MainTabber, "World")
AddGadgetItem(MainTabber, "Continent")
AddGadgetItem(MainTabber, "Int Region")
AddGadgetItem(MainTabber, "Nation")
AddGadgetItem(MainTabber, "Region")
AddGadgetItem(MainTabber, "City")
AddGadgetItem(MainTabber, "Stadium")
AddGadgetItem(MainTabber, "Club")
AddGadgetItem(MainTabber, "People")
AddGadgetItem(MainTabber, "Competition")
AddGadgetItem(MainTabber, "League")
AddGadgetItem(MainTabber, "Game")
AddGadgetItem(MainTabber, "Defunct")

For Local x = 0 To 12
	MainTabberPanel[x] = CreateDataPanel(MainTabber)
Next
ShowGadget MainTabberPanel[0]
MainTabberCurrent = MainTabberPanel[0]

GameTabber = CreateTabber(5, 5, ClientWidth(MainTabberPanel[11]) - 10, ClientHeight(MainTabberPanel[11]) - 10, MainTabberPanel[11])
AddGadgetItem(GameTabber, "First Names")
AddGadgetItem(GameTabber, "Surnames")
AddGadgetItem(GameTabber, "Language")
AddGadgetItem(GameTabber, "Currency")
AddGadgetItem(GameTabber, "Injury")

For Local x = 0 To 4
	GameTabberPanel[x] = CreateDataPanel(GameTabber)
Next
ShowGadget GameTabberPanel[0]
GameTabberCurrent = GameTabberPanel[0]

DefunctTabber = CreateTabber(5, 5, ClientWidth(MainTabberPanel[12]) - 10, ClientHeight(MainTabberPanel[12]) - 10, MainTabberPanel[12])
AddGadgetItem(DefunctTabber, "Nation")
AddGadgetItem(DefunctTabber, "Club")
AddGadgetItem(DefunctTabber, "Person")
AddGadgetItem(DefunctTabber, "Competition")

For Local x = 0 To 3
	DefunctTabberPanel[x] = CreateDataPanel(DefunctTabber)
Next
ShowGadget DefunctTabberPanel[0]
DefunctTabberCurrent = DefunctTabberPanel[0]

ClubTabber = CreateTabber(210, 5, ClientWidth(MainTabberPanel[7]) - 215, ClientHeight(MainTabberPanel[7]) - 10, MainTabberPanel[7])
AddGadgetItem(ClubTabber, "Details")
AddGadgetItem(ClubTabber, "Teams")
AddGadgetItem(ClubTabber, "Staff")
AddGadgetItem(ClubTabber, "Players")

For Local x = 0 To 3
	ClubTabberPanel[x] = CreateDataPanel(ClubTabber)
Next
ShowGadget ClubTabberPanel[0]
ClubTabberCurrent = ClubTabberPanel[0]

PersonTabber = CreateTabber(210, 5, ClientWidth(MainTabberPanel[8]) - 215, ClientHeight(MainTabberPanel[8]) - 10, MainTabberPanel[8])
AddGadgetItem(PersonTabber, "Person")
AddGadgetItem(PersonTabber, "Player")
AddGadgetItem(PersonTabber, "Technical")
AddGadgetItem(PersonTabber, "Mental + Physical")
AddGadgetItem(PersonTabber, "Coach")
AddGadgetItem(PersonTabber, "Referee")
AddGadgetItem(PersonTabber, "Physio")
AddGadgetItem(PersonTabber, "Businessman")

For Local x = 0 To 7
	PersonTabberPanel[x] = CreateDataPanel(PersonTabber)
Next
ShowGadget PersonTabberPanel[0]
PersonTabberCurrent = PersonTabberPanel[0]


Function CreateDataPanel:TGadget(tabber:TGadget)

	Local panel:TGadget
	panel=CreatePanel(0,0,ClientWidth(tabber),ClientHeight(tabber),tabber)
	SetGadgetLayout panel,1,1,1,1
	HideGadget panel
	Return panel
	
End Function