Re: Enable or disable distinct Tabpanel pages

[Arnaud Nicolet <arnaud at tribu dot ch>]

Le 29 sept. 06 à 11:10 Matin, Bart Pietercil a écrit:

> Hi List,
>
> I didn't find a way to enable or disable one (or more but not all)  
> pages of a tabpanel. How would I go about disabling a second page  
> of a tabpanel while not disabling the first page?
> Not possible or .....?
Use this declare:


Sub EnableOrDisableTab(ThePanel As TabPanel,TabIndex As  
Integer,enabled As Boolean)
dim err as integer

declare function SetTabEnabled lib "AppearanceLib" (tabcontrol as  
Integer, tabindex as short, enabled as boolean) as Short
err = SetTabEnabled(ThePanel.MacControlHandle, TabIndex, enabled)

'if err<>0 then an error occurred
End sub

For MacOS X, replace "AppearanceLib" with 
"CarbonLib"_______________________________________________
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>