Pageframe caption?

[august]

How can i append the caption i mean the name of a page that appear on the tab of a pageframe?

august [sig][/sig]

 

[foxdev]

You can change the captions that appear on the tabs by setting the property, such as this example:

ThisForm.pageframe1.page1.caption = "My Page 1"
[sig]<p>Robert Bradley<br><a href=mailto: > </a><br><a href=

http://www.foxdev.com/>FoxDev

- Visual FoxPro Development</a><br> [/sig]

 

[TomasDill]

How can i append the caption...

ThisForm.pageframe1.page1.caption = ThisForm.pageframe1.page1.caption + &quot; My additional note&quot;

or better

ThisForm.pageframe1.page1.caption = m.MyOriginalCaption + &quot; My additional note&quot;

for case when you have many different 'add-ons' to caption. m.MyOriginalCaption may be either public variable or you may make it a property of form (like thisformm.MyOriginalCaption). At Init of form assign original caption to it:

public m.MyOriginalCaption = ThisForm.pageframe1.page1.caption

and clear at Destroy

rlease m.MyOriginalCaption

[sig]<p>Vlad Grynchyshyn<br><a href=mailto:vgryn@softserve.lviv.ua>vgryn@softserve.lviv.ua</a><br>[/sig]

 

[Creeder]

Just to make things even better you could make the caption of that current page bold, by doing:

In the Page Activate Event =
This.FONTBOLD = .T.

In the Page Deactivate Event =
THIS.FONTBOLD = .F.

Yue Jeen [sig][/sig]