Page 1 of 1

GET SPINNER height

Posted: Mon Jul 09, 2007 9:51 pm
by Enrico Maria Giordano
Is it possible to reduce the height of a GET with SPINNER? This is a sample:

Code: Select all

#include "Fivewin.ch"


FUNCTION MAIN()

   LOCAL oDlg

   LOCAL oGet, nVar := 10

   DEFINE DIALOG oDlg 

   @ 1, 1 GET oGet VAR nVar;
          PICTURE "99";
          SPINNER MIN 6 MAX 99;
          SIZE 100, 10

   @ 3, 1 BUTTON "&Close";
          ACTION oDlg:End()

   ACTIVATE DIALOG oDlg; 
            CENTER

   RETURN NIL
EMG

Posted: Tue Jul 10, 2007 8:33 pm
by Rossine
Hi Enrico,

Try this:

Code: Select all

   ACTIVATE DIALOG oDlg; 
            CENTER on init oGet:nHeight := 10

Regards

Rossine.

Posted: Tue Jul 10, 2007 8:46 pm
by Enrico Maria Giordano
Thank you, it works!

EMG