windows 2003 ce
I can't see menu in PPC
// FiveWin for Pocket PC - Using PullDown Menus
#include "FWCE.ch"
//----------------------------------------------------------------------------//
function Main()
local oWnd
DEFINE WINDOW oWnd TITLE "Tutor03" ;
MENU BuildMenu()
ACTIVATE WINDOW oWnd ;
ON CLICK MsgInfo( "Click!" )
return nil
//----------------------------------------------------------------------------//
function BuildMenu()
local oMenu, oMenuItem
DEFINE MENU oMenu RESOURCE 102
REDEFINE MENUITEM ID 100 OF oMenu ACTION MsgInfo( "MenuItem action" ) WHEN .f.
REDEFINE MENUITEM ID 110 OF oMenu ACTION MsgAlert( "FWCE power!" )
return oMenu
//----------------------------------------------------------------------------//