Well, I hate both databases and advertisements. Now I understand why!
Le 29 sept. 06 à 16:33 Soir, John a écrit:
Please remove
www.mevaprod.co.za
083 398 7918
011-659-0798
Designer Databases
Project Management
Database Hosting
Regards
John
Disclaimer
Any unauthorised use or interception of this e-mail is strictly
prohibited.
If this e-mail is not intended for you, you may not copy,
distribute or
disclose the contents to anyone. If you are not the intended recipient
please delete this e-mail immediately. MevaProd cannot accept
responsibility
or liability for any damages whatsoever arising from or as a result
of the
use of or reliance on the content of this message. MevaProd cannot
give any
warranty or guarantee concerning the confidentiality or security of
the
e-mail system.
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Arnaud
Nicolet
Sent: 29 September 2006 03:38 PM
To: Getting Started
Subject: Re: Enable or disable distinct Tabpanel pages
Le 29 sept. 06 à 15:21 Soir, Bart Pietercil a écrit:
But, what do you mean by "they may see the controls, but can't use
them"?
When a control is invisible, it can't be neither seen nor used.
Yes I understand
I just mean that it is OK for my user to see the control as long as
they are not able to manipulate them. Since I throw a msgbox when
they see the second page they cannot manipulate it because when the
msgbox is closed the tabpanel.value = 0
Ok, now I understand.
If you want, you can however hide them.
For example, if you use this method:
sub SetControlsVisibleInTabPanel(PanelID as Integer,IsVisible As
Boolean)
dim c As Control
dim i As integer
dim r As RectControl
for i=0 to ControlCount-1
c=Control(i)
if c.TabPanelIndex=PanelID then
if c isa RectControl then
r=RectControl(c)
r.Visible=False
end if
end if
Next
self.Refresh
end sub
you can then use
SetControlsVisibleInTabPanel 2,false
MsgBox "So you think you are allowed to see this pane?! Haha, that's
funny!"
SetControlsVisibleInTabPanel
2,true_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
--
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.407 / Virus Database: 268.12.9/458 - Release Date: 27/
Sep/2006
--
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.407 / Virus Database: 268.12.9/458 - Release Date: 27/
Sep/2006
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
