Luiz Arruda (ICO) Posted March 10, 2009 Report Share Posted March 10, 2009 Boa Tarde a todos Teria como colocar um VALID diretamente no Get sem precisar desviar para uma function ?? Tipo + - assim .. Redefine Get oGet[1] Var cVar ID pipipi popopo ; Valid {|| iif(cCodi#cBase...id=code>id=code>Obrigado.. Luiz Arruda - Corumba(MS) FiveWin 9.01 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> Editado por - ico on 11/03/2009 10:50:56 Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted March 10, 2009 Author Report Share Posted March 10, 2009 Boa Tarde a todos Teria como colocar um VALID diretamente no Get sem precisar desviar para uma function ?? Tipo + - assim .. Redefine Get oGet[1] Var cVar ID pipipi popopo ; Valid {|| iif(cCodi#cBase...id=code>id=code>Obrigado.. Luiz Arruda - Corumba(MS) FiveWin 9.01 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> Editado por - ico on 11/03/2009 10:50:56 Quote Link to comment Share on other sites More sharing options...
sambomb Posted March 10, 2009 Report Share Posted March 10, 2009 Redefine Get oGet[1] var nVar; Update; ID 100; valid (If x > 2); of oDlg id=code>id=code>MSN: samirid=red>abreuid=black>@hotmail.com Skype: Samirid=red>Abreuid=black> xHarbour 1.1.0 + FwXh 8.02 Quote Link to comment Share on other sites More sharing options...
Luisão Posted March 10, 2009 Report Share Posted March 10, 2009 Você pode também fazer um VALID EVAL(bBlock) bBlock:= {|| MSGYESNO("Validar GET ?","ATENÇÃO") } bBlock:= {|| IF(nTipo<0,.F.,.T.) } bBlock:= {|| nTIPO:= 999, MSGINFO(nTIPO), .T.} Work it Harder Make it Better Do it Faster Make us Stronger Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted March 10, 2009 Author Report Share Posted March 10, 2009 Obrigado Pessoal mas resolvi desta maneira Redefine GET oGet[5] var cCodi ID 4008 of odlg ; valid Eval({||iif(cCodi#cBase,.f.,.t.)}) id=code>id=code>+ 1 x Obrigado Luiz Arruda - Corumba(MS) FiveWin 9.01 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
Kbelo Posted March 10, 2009 Report Share Posted March 10, 2009 citação:Obrigado Pessoal mas resolvi desta maneira Redefine GET oGet[5] var cCodi ID 4008 of odlg ; valid Eval({||iif(cCodi#cBase,.f.,.t.)}) id=code>id=code>+ 1 x Obrigado Luiz Arruda - Corumba(MS) FiveWin 9.01 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> id=quote>id=quote>Nao seria a mesma coisa que Redefine GET oGet[5] var cCodi ID 4008 of odlg ; valid cCodi==cBase Ou Redefine GET oGet[5] var cCodi ID 4008 of odlg ; valid !(cCodi==cBase) id=code>id=code>Marcelo Michels Msn/E-mail:marcelo@infototal.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.1 + Fwh 8.01 + WorkShop + Bcc 5.82 + WvwTools + SQLRDD + xMate. Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted March 11, 2009 Author Report Share Posted March 11, 2009 citação: citação:Obrigado Pessoal mas resolvi desta maneira Redefine GET oGet[5] var cCodi ID 4008 of odlg ; valid Eval({||iif(cCodi#cBase,.f.,.t.)}) id=code>id=code>+ 1 x Obrigado Luiz Arruda - Corumba(MS) FiveWin 9.01 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> id=quote>id=quote>Nao seria a mesma coisa que Redefine GET oGet[5] var cCodi ID 4008 of odlg ; valid cCodi==cBase Ou Redefine GET oGet[5] var cCodi ID 4008 of odlg ; valid !(cCodi==cBase) id=code>id=code>Marcelo Michels Msn/E-mail:marcelo@infototal.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.1 + Fwh 8.01 + WorkShop + Bcc 5.82 + WvwTools + SQLRDD + xMate. id=quote>id=quote>E ai Grande..beleza ?? pode até ser.. mas nos dois exemplos não consegui colocar um msginfo()... Tem alguma solução ??? Abraços... Luiz Arruda - Corumba(MS) FiveWin 9.01 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
Luisão Posted March 11, 2009 Report Share Posted March 11, 2009 citação:bBlock:= {|| MSGYESNO("Validar GET ?","ATENÇÃO") }bBlock:= {|| IF(nTipo<0,.F.,.T.) } bBlock:= {|| nTIPO:= 999, MSGINFO(nTIPO), .T.} id=quote>id=quote>Testou da meneira que postei ? Assim, você pode dar MsgInfo, atribuição de valor para variáveis, etc... apenas adapte para suas necessidades Work it Harder Make it Better Do it Faster Make us Stronger Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted March 11, 2009 Author Report Share Posted March 11, 2009 citação: citação:bBlock:= {|| MSGYESNO("Validar GET ?","ATENÇÃO") }bBlock:= {|| IF(nTipo<0,.F.,.T.) } bBlock:= {|| nTIPO:= 999, MSGINFO(nTIPO), .T.} id=quote>id=quote>Testou da meneira que postei ? Assim, você pode dar MsgInfo, atribuição de valor para variáveis, etc... apenas adapte para suas necessidades Work it Harder Make it Better Do it Faster Make us Stronger id=quote>id=quote>Testei Sim, só que eu quero um msginfo() sempre que os codigos forem #, do jeito que vc. diz tanto para codigos diferentes ou iguais aparece a mensagem ao passar pelo Get... Luiz Arruda - Corumba(MS) FiveWin 9.01 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
Luisão Posted March 11, 2009 Report Share Posted March 11, 2009 citação:Testei Sim, só que eu quero um msginfo() sempre que os codigos forem #, do jeito que vc. diz tanto para codigos diferentes ou iguais aparece a mensagem ao passar pelo Get...id=quote>id=quote>Daà entraria a parte que eu disse pra você adaptar para suas necessidades... mas eu acho que ficaria mais ou menos assim... id=code>id=code>Eu testei aqui e funcionou e pelo que entendi, acho que é algo desse tipo que você quer... espero ter ajudado =D Work it Harder Make it Better Do it Faster Make us Stronger Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted March 11, 2009 Author Report Share Posted March 11, 2009 No Mosca Exactamente isso mesmo.. Valeu.. Luiz Arruda - Corumba(MS) FiveWin 9.01 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.