Codejock Developer Community : OpenEdge Minimize Restore Close Buttons Disabled

OpenEdge Minimize Restore Close Buttons Disabled : Solution is to call :DeleteAll()...

Mon, 29 Nov 2010 07:21:40 +0000

Author: oli.dune
Subject: 15393
Posted: 29 November 2010 at 7:21am

Solution is to call :DeleteAll() right after :AttachToWindow().

OpenEdge Minimize Restore Close Buttons Disabled : I there,I tried to add a CommandBars...

Thu, 14 Oct 2010 03:51:24 +0000

Author: oli.dune
Subject: 15393
Posted: 14 October 2010 at 3:51am

I there,

I tried to add a CommandBars control, the min/max/close buttons are available again, but the window's menubar is still hidden when the :AttachToWindow() method is invoked (although accelerators are still working).

Any advice?
Thanks in advance

OpenEdge Minimize Restore Close Buttons Disabled : Thanks for the Help tip, I will...

Tue, 10 Nov 2009 07:43:12 +0000

Author: pberox
Subject: 15393
Posted: 10 November 2009 at 7:43am

Thanks for the Help tip, I will try today!!! ;-)

Ciao,

Paolo

OpenEdge Minimize Restore Close Buttons Disabled : You should apply the skin to the...

Tue, 10 Nov 2009 07:41:11 +0000

Author: adwild2
Subject: 15393
Posted: 10 November 2009 at 7:41am

You should apply the skin to the Windows-window of the OpenEdge-window. The handle to the Windows-window can be retrieved with the GetParent function in user32.dll. To get the windows buttons working you should add a commandbars object to the window (it doesn't have to be visible).

Example:


PROCEDURE initialize-controls :
DEFINE       VARIABLE  ch_Skin           AS COM-HANDLE   NO-UNDO.
DEFINE       VARIABLE  ch_CommandBars    AS COM-HANDLE   NO-UNDO.
DEFINE       VARIABLE  i_hWnd            AS INTEGER      NO-UNDO.
DEFINE       VARIABLE  c_Tmp             AS CHARACTER    NO-UNDO.

   ASSIGN ch_Skin        = chocx_SkinFramework:SkinFramework
          ch_CommandBars = chocx_CommandBars:CommandBars.

   ASSIGN ch_Skin:ApplyOptions = 14.

   RUN GetParent( win_Main:HWND, OUTPUT i_hWnd ).

   ASSIGN c_Tmp = SEARCH( "c:\temp\Office2007.cjstyles":U ).
   ch_Skin:LoadSkin( c_Tmp, "NormalBlack.ini":U ).
   ch_Skin:ApplyWindow( i_hWnd ).

   ch_CommandBars:AttachToWindow( i_hWnd ).

   ASSIGN win_Main:HIDDEN = FALSE.

END PROCEDURE.

PROCEDURE GetParent EXTERNAL "USER32.DLL":
    DEFINE INPUT PARAMETER hwndChild  AS LONG.
   DEFINE RETURN PARAMETER hwndParent AS LONG.
END PROCEDURE.

OpenEdge Minimize Restore Close Buttons Disabled : I am using rel 13.1 demo to evaulate...

Mon, 19 Oct 2009 07:43:33 +0000

Author: pberox
Subject: 15393
Posted: 19 October 2009 at 7:43am

I am using rel 13.1 demo to evaulate the possibilty to have Office 2007 skin in our Progress OpenEdge (9.1e / 10.1c) applications.

The Minimize, Restore and Close button are Not active when the skin is applyed to a OpenEdge WINDOW.

the Close button works as expected with OpenEdge DIALOG.

I tried :

mySkin:AddWindowClass("ProMainWin","MDIClient").

The Minimize/Restore/Close work well but the menu is not displayed.

I tried also all the possible combination of MySkin:ApplyOptions

the only working is MySkin:ApplyOptions = 14 ( xtpSkinApplyColors + xtpSkinApplyFrame + xtpSkinApplyMenu)

the MySkin:ApplyMetrics make strange windows resize.

thanks for your help,

Paolo