I created a class off of the class page. The problem is that when I use an addobject command I can't seem to use a variable to give it a name.

Example.

DEFINE CLASS mypage AS Page
Visible = .T.
PROCEDURE Click
...
ENDPROC
ENDDEFINE

itemp = str(thisform.pageframe.activepage)
var1 = "Page" + itemp

thisform.pageframe1.addobject(var1, 'mypage')


The reason bhind this is to keep creating a pagename with a higher number... so that no two page objects have the same name.

Does anyone know how to create new pages useing the new class above and would give it a unique name?

I need to keep the pages dynamic.