Soporte de MsgBar
Posted: Wed Jul 07, 2010 2:39 am- Code: Select all Expand view
- #include "FiveMac.ch"
function Main()
local oWnd
DEFINE WINDOW oWnd TITLE "Tutor02" ;
FROM 200, 200 TO 600, 400
DEFINE MSGBAR OF oWnd
ACTIVATE WINDOW oWnd ;
ON CLICK MsgInfo( "Click" ) ;
VALID MsgYesNo( "Want to end ?" )
return nil
