How to use:
This code is needed in the Caller Form:


Uses Objectpal
setformname(StrFormname String) Logical
endUses


method pushButton(var eventInfo Event)
var
	Formular,	
	ThisForm	Form
	Lib		Library
	Str		String
endvar
Lib.open("vars.lsl")
ThisForm.attach()
Str = ThisForm.gettitle()
if Lib.setFormname(Str) then
Formular.open("Speedbar")
else
	errormessage()
endif
endMethod

If it is not satisfiying, you can make it better, then upload
it again !

Greetings, Oliver