Although meantime I found the solution to my problem in Aaron's 
FunctionalitySuite, I thank you for answering.

>From: Malcolm Smith <[EMAIL PROTECTED]>
>Date: Tue, 3 Oct 2006 17:24:51 -0700

>You can use the following to have a window which has working close 
>and minimize icons and a disabled maximize icon.
>
>
>   #if TargetWin32
>
>    dim Win32WinStyle as integer
>
>     Declare Function GetWindowLongW Lib "user32.dll" (m_hWnd as 
>integer, index as integer) as integer
>     Declare Sub SetWindowLongW Lib "user32.dll" (m_hWnd as integer, 
>index as integer, GWL_STYLE as integer)
>
>     Win32WinStyle = GetWindowLongW(me.WinHWND, -16)
>     Win32WinStyle = BitWiseAnd(Win32WinStyle,&hFFFEFFFF)
>     SetWindowLongW(me.WinHWND, -16, Win32WinStyle)
>
>     if not self.zoomIcon then
>       MsgBox "Build Win32 version with zoomIcon enabled"
>     end
>
>   #endif
>
>
>I hope that helps.
>
>Malcolm Smith
-- 
Carlo
_______________________________________________
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>

Reply via email to