>@ <row, column> GET <memvar> | <field> >FUNCTION <expC1> | PICTURE <expC2> > [FONT <expC3>[, <expN1>]] > [STYLE <expC4>] > [DEFAULT <expr>] > [SIZE <expN2>, <expN3>] > [ENABLE | DISABLE] > [MESSAGE <expC5>] > [VALID <expL1> | <expN4>] > [WHEN <expL2>] > [COLOR SCHEME <expN5> | COLOR <color pair list>] > > >>
>mValue = .t. >@0,0 get mValue FUNCTION '*CN3' Picture 'Select' >>
> > >STORE 1 TO mchoice >@ 2,2 GET mchoice FUNCTION '*C Titles' >READ >STORE 1 TO mchoice >STORE '*C Titles' TO mprompt >@ 2,2 GET mchoice FUNCTION mprompt >READ > > > >PICTURE clause only: > > > >STORE 1 TO mchoice >@ 2,2 GET mchoice PICTURE '@*C Titles' >READ >STORE 1 TO mchoice >@ 2,2 GET mchoice PICTURE '@*C' + ' Titles' >READ >Based on your other message <g>, this seems to work as well
nSummary = 0 @ row(), 20 GET m.nSummary ; PICTURE "@*C Summary Report Only?" ; DEFAULT 0 ; FONT "MS Sans Serif", 8 ; STYLE "BT"