Alaska Software Inc. - Clear a Tab Page
Username: Password:
AuthorTopic: Clear a Tab Page
Don SchmitzClear a Tab Page
on Tue, 19 Dec 2006 14:57:22 -0600
New to Xbase but have an app that has a couple of fields (lets say
customers) and tab pages (say invoices) when I start the tab pages are blank
until I select one of the tab pages and its populated with the info I want,
no if I skip to the next customer the old data invoices remain visible in
the previous tab page.  I want to have the tabpage clear when navigating to
a new customer but how do I clear what is displayed on the tabpage in
clipper would do @10,10 to 20,60 clear, is there some equal in Xbase.

Thanks



*********************************************
Don Schmitz
University Hospital Surgery Dept.
600 Highland Ave. F8-164
Madison, WI  53792
(608) 263-9307
Email: Dons@surgery.wisc.edu
James Loughner Re: Clear a Tab Page
on Tue, 19 Dec 2006 17:12:05 -0500
Either destroy or hide the GUI controls. The easiest way is to have an
array(s) that contains reference to the controls on the page in question.

ie every time you create a control add it to the aPageControl array.

oCtrl := XbpSLE():New()
oCtrl:Create()

AADD(aPageControl,oCtrl)

etc

when you are done and want to clear these controls

AEVAL(aPageControl, {|a| a:destroy()})
aPageControl := {}

will zap all the controls for that page.

if hiding
AEVAL(aPageControl, {|a| a:Hide()})

to reshow them
AEVAL(aPageControl, {|a| a:Show()})

Remember that unlike in DOS you are not simply painting something on the
screen you a putting an object on the screen. To get rid of it you must
destroy the object.

You might want to look at my SLEPic class to get more Clipper like
navigation and pictures in a XBpSLE compatible class

http://gogalthorp.com/splash/

Its free if you like it buy me a lunch 

Jim



Don Schmitz wrote:
> New to Xbase but have an app that has a couple of fields (lets say
> customers) and tab pages (say invoices) when I start the tab pages are blank
> until I select one of the tab pages and its populated with the info I want,
> no if I skip to the next customer the old data invoices remain visible in
> the previous tab page.  I want to have the tabpage clear when navigating to
> a new customer but how do I clear what is displayed on the tabpage in
> clipper would do @10,10 to 20,60 clear, is there some equal in Xbase.
> 
> Thanks
> 
> 
> 
> *********************************************
> Don Schmitz
> University Hospital Surgery Dept.
> 600 Highland Ave. F8-164
> Madison, WI  53792
> (608) 263-9307
> Email: Dons@surgery.wisc.edu
> 
>
Don SchmitzRe: Clear a Tab Page
on Wed, 20 Dec 2006 10:20:35 -0600
Thanks I'll give it a try


*********************************************
Don Schmitz
University Hospital Surgery Dept.
600 Highland Ave. F8-164
Madison, WI  53792
(608) 263-9307
Email: Dons@surgery.wisc.edu



>>> On 12/19/2006 at 4:12 PM, in message
<46e3f5c2$13cc03b$2c5ca@news.alaska-software.com>, James
Loughner<jwrl@charter.net> wrote:
> Either destroy or hide the GUI controls. The easiest way is to have an
> array(s) that contains reference to the controls on the page in 
> question.
> 
> ie every time you create a control add it to the aPageControl array.
> 
> oCtrl := XbpSLE():New()
> oCtrl:Create()
> 
> AADD(aPageControl,oCtrl)
> 
> etc
> 
> when you are done and want to clear these controls
> 
> AEVAL(aPageControl, {|a| a:destroy()})
> aPageControl := {}
> 
> will zap all the controls for that page.
> 
> if hiding
> AEVAL(aPageControl, {|a| a:Hide()})
> 
> to reshow them
> AEVAL(aPageControl, {|a| a:Show()})
> 
> Remember that unlike in DOS you are not simply painting something on the
> screen you a putting an object on the screen. To get rid of it you must
> destroy the object.
> 
> You might want to look at my SLEPic class to get more Clipper like
> navigation and pictures in a XBpSLE compatible class
> 
> http://gogalthorp.com/splash/ 
> 
> Its free if you like it buy me a lunch 
> 
> Jim
> 
> 
> 
> Don Schmitz wrote:
>> New to Xbase but have an app that has a couple of fields (lets say
>> customers) and tab pages (say invoices) when I start the tab pages are 
> blank
>> until I select one of the tab pages and its populated with the info I 
> want,
>> no if I skip to the next customer the old data invoices remain visible 
> in
>> the previous tab page.  I want to have the tabpage clear when navigating

> to
>> a new customer but how do I clear what is displayed on the tabpage in
>> clipper would do @10,10 to 20,60 clear, is there some equal in Xbase.
>> 
>> Thanks
>> 
>> 
>> 
>> *********************************************
>> Don Schmitz
>> University Hospital Surgery Dept.
>> 600 Highland Ave. F8-164
>> Madison, WI  53792
>> (608) 263-9307
>> Email: Dons@surgery.wisc.edu 
>> 
>>
AUGE_OHRRe: Clear a Tab Page
on Wed, 20 Dec 2006 05:51:35 +0100
hi,

> ... if I skip to the next customer the old data invoices remain visible in
> the previous tab page.  I want to have the tabpage clear ...

why not :refresh() and show next customer ?
like in Jim exsample use :

AEVAL(aPageControl, {|a| a:Setdata(), a:show()})

greetings by OHR
Jimmy
Don SchmitzRe: Clear a Tab Page
on Wed, 20 Dec 2006 10:21:48 -0600
Thanks I'll give it a try



*********************************************
Don Schmitz
University Hospital Surgery Dept.
600 Highland Ave. F8-164
Madison, WI  53792
(608) 263-9307
Email: Dons@surgery.wisc.edu