Use this code for MacOS X. The code you found isn't very good.
Soft Declare Function ChangeWindowAttributes Lib Carbon.framework
(window as WindowPtr, setAttributes as Integer, clearAttributes as
Integer) as Integer
Const kWindowFullZoomAttribute = 6
dim OSError as Integer = ChangeWindowAttributes( self, 0,
kWindowFullZoomAttribute)
If you want to disable the zoom button, why not just uncheck the
MaximizeButton property of the window in the IDE?
Charles Yeomans
On Oct 9, 2006, at 9:40 AM, Lennox Jacob wrote:
Hello,
I have the following code:
'Zoom button in my program's main window disabled with this
#if TargetCarbon
Declare Sub ChangeWindowAttributes Lib "CarbonLib" (win as
WindowPtr, setAttribs as integer, removeAttribs as integer)
ChangeWindowAttributes self, 0, 6
#elseif TargetMachO
Declare Sub ChangeWindowAttributes Lib "Carbon" (win as WindowPtr,
setAttribs as integer, removeAttribs as integer)
ChangeWindowAttributes self, 0, 6
#endif
When I try to build in i386 or UB I get a message indicating that
CarbonLib should be changed to Carbon, changing that corrects the
problem, but is there a way to add something like
#elseif ...
so that I don't have to change anything?
Thanks.
Lennox
---------------------------------
Get your email and more, right on the new Yahoo.com
_______________________________________________
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>
