¿Hay alguna manera de usar HIDE () para obtener el "spinner get" para obtener un get normal?
en tiempo de ejecución
gracias...
Tira spinner del get
Re: Tira spinner del get
spinner ser um objeto, usando hide vc esconde o objeto spinner.
acho q vc deveria usar um get com 2 botoes do lado, ai vc teria o controle de ocultar ou nao os botoes.
acho q vc deveria usar um get com 2 botoes do lado, ai vc teria o controle de ocultar ou nao os botoes.
FWH2008 | xHarbour | BCC74 | SQLRDD
Re: Tira spinner del get
com RECURSOS não tem como vc eliminar o controle e não tem como mudar em tempo de execução, a não ser criando dois controles e usando hide(), agora com @ l,c consegui desta forma:
Code: Select all | Expand
lTrocaGet := .F.
@ 060,010 CHECKBOX lTrocaGet PROMPT "Troca Get" SIZE 45,9 PIXEL ON CLICK TrocaGet() OF oDlg
nGet := 30
@ 070,010 GET oGet VAR nGet SIZE 050,16 PIXEL SPINNER MIN 30 MAX 500 OF oDlg
FUNCTION TrocaGet()
oGet:End()
IF lTrocaGet
//Sem Spinner
oGet := TGet():New( 070, 100, { | u | If( PCount()==0, nGet, nGet:= u ) }, oDlgFun3, 050, 16,,,,,, .F.,, .T.,, .F.,, .F., .F.,, .F., .F., .F.,, .T.,,,,,,, "oGet", )
ELSE
//Com Spinner
oGet := TGet():New( 070, 100, { | u | If( PCount()==0, nGet, nGet:= u ) }, oDlgFun3, 050, 16,,,,,, .F.,, .T.,, .F.,, .F., .F.,, .F., .F., .F.,, .T.,,, {|| 30}, {|| 500},,, "oGet", )
ENDIF
oGet:Refresh()