Antonio : SPINNER GET : WHY NOT run ?

Post Reply
User avatar
Silvio
Posts: 3107
Joined: Fri Oct 07, 2005 6:28 pm
Location: Teramo,Italy

Antonio : SPINNER GET : WHY NOT run ?

Post by Silvio »

#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
Best Regards, Saludos

Falconi Silvio
Post Reply