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>
