Antonio : SPINNER GET : WHY NOT run ?
Posted: Fri Aug 28, 2009 6:57 pm
#include "Fwce.ch"
FUNCTION MAIN()
LOCAL oWnd
LOCAL cVar1 := SPACE( 20 )
DEFINE WINDOW oWnd TITLE "sPINNER"
@ 1, 10 GET cVar1 SIZE 70, 20 OF oWnd
oGet:bGotFocus := {|| SendMessage( oGet:hWnd, IDC_SPIN1, CCM_SETVERSION, COMCTL32_VERSION, 0 ) }
ACTIVATE WINDOW oWnd
RETURN NIL
seeit please http://www.pocketpcdn.com/articles/pocketpcspin.html
FUNCTION MAIN()
LOCAL oWnd
LOCAL cVar1 := SPACE( 20 )
DEFINE WINDOW oWnd TITLE "sPINNER"
@ 1, 10 GET cVar1 SIZE 70, 20 OF oWnd
oGet:bGotFocus := {|| SendMessage( oGet:hWnd, IDC_SPIN1, CCM_SETVERSION, COMCTL32_VERSION, 0 ) }
ACTIVATE WINDOW oWnd
RETURN NIL
seeit please http://www.pocketpcdn.com/articles/pocketpcspin.html