* New: FWPPC, function SerialNumber() returns the Pocket PC serial number if available. Thanks to Hathal.
* New: FWPPC, Class TTabControl, please review samples\TestTab.prg. This class will be involved in folders implementation. Warning: Folders are not available yet.
* Enhancement: FWPPC, function MsgInfo(), MsgAlert() and MsgStop() automatically convert parameters into strings, like FWH does it.
Code: Select all
#include "FWCE.ch"
function Main()
local oWnd
DEFINE WINDOW oWnd TITLE "TabControl"
@ 2, 2 TABCONTROL oTabs PROMPTS { "One", "Two", "Three" } ;
OPTION 2 ACTION MsgInfo( oTabs:nOption ) ;
SIZE 205, 80 OF oWnd
ACTIVATE WINDOW oWnd ;
ON CLICK MsgInfo( "Click!" )
return nil