Late on a Friday here at the office, I put this in a prg and still see the
behavior.

   oTest = CREATEOBJECT("pageframeartifact")
   oTest.Show()

   oTest = .NULL.
   CLEAR CLASS pageframeartifact

   DEFINE CLASS pageframeartifact as Form 

   windowtype = 1
   caption = "Active Page 2 of both pageframes - Pull down quickly"

   ADD OBJECT pgf as pageframe WITH ;
      pagecount = 2, anchor = 5, width = 450

   PROCEDURE init 
      this.height = 250
      this.Width = 450
      this.pgf.page2.addobject("pgf", "pageframe")
      this.pgf.page2.pgf.height = 100
      this.pgf.page2.pgf.top = 116 
      this.pgf.page2.pgf.width = 450
      this.pgf.page2.pgf.pagecount = 2
      this.pgf.page2.pgf.anchor = 14
      this.pgf.page2.pgf.visible = .T.
      this.pgf.page2.pgf.page2.addobject("edt", "editbox")
      this.pgf.page2.pgf.page2.edt.top = 10
      this.pgf.page2.pgf.page2.edt.left = 10
      this.pgf.page2.pgf.page2.edt.width = this.Width - 20
      this.pgf.page2.pgf.page2.edt.height = 60
      this.pgf.page2.pgf.page2.edt.visible = .T.
   ENDPROC 

   ENDDEFINE



_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: 
http://leafe.com/archives/byMID/profox/[email protected]
** All postings, unless explicitly stated otherwise, are the opinions of the 
author, and do not constitute legal or medical advice. This statement is added 
to the messages for those lawyers who are too stupid to see the obvious.

Reply via email to