Flavio A. Zago Posted November 6, 2006 Report Share Posted November 6, 2006 Pessoal Atualizei meu FWH26 p/ FWH28 e após isso estou tendo problemas com a clausula VALID quando só tem um GET. Alguem pode me ajudar? Abaixo um exemplo onde o VALID não funciona: #Include "FiveWin.ch" FUNCTION Main() LOCAL oDlg,; cGet := SPACE(1),; oGet DEFINE DIALOG oDlg TITLE "Teste GET (VALID)" @ 2,6 GET oGet VAR cGet PICTURE '@R 9' OF oDlg SIZE 10, 10 VALID TestValid() ACTIVATE DIALOG oDlg CENTERED RETURN NIL FUNCTION TestValid() MSGINFO('PASSOU') RETURN .T. []´s Flavio FWH28 + VERCE 4.3 + XHARBOUR 99.61 + WORKSHOP FWH28 + XBUILD + XHARBOUR (ENTERPRISE) Quote Link to comment Share on other sites More sharing options...
Flavio A. Zago Posted November 6, 2006 Author Report Share Posted November 6, 2006 Pessoal Atualizei meu FWH26 p/ FWH28 e após isso estou tendo problemas com a clausula VALID quando só tem um GET. Alguem pode me ajudar? Abaixo um exemplo onde o VALID não funciona: #Include "FiveWin.ch" FUNCTION Main() LOCAL oDlg,; cGet := SPACE(1),; oGet DEFINE DIALOG oDlg TITLE "Teste GET (VALID)" @ 2,6 GET oGet VAR cGet PICTURE '@R 9' OF oDlg SIZE 10, 10 VALID TestValid() ACTIVATE DIALOG oDlg CENTERED RETURN NIL FUNCTION TestValid() MSGINFO('PASSOU') RETURN .T. []´s Flavio FWH28 + VERCE 4.3 + XHARBOUR 99.61 + WORKSHOP FWH28 + XBUILD + XHARBOUR (ENTERPRISE) Quote Link to comment Share on other sites More sharing options...
kapiaba Posted November 6, 2006 Report Share Posted November 6, 2006 PONHA MAIS UM GET, POIS COM UM GET SÓ, A CLASSE NAO TEM PARA ONDE DISPARAR. João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
vagner Posted November 6, 2006 Report Share Posted November 6, 2006 Olá, Isso já foi amplamente discutido , como disse o Kapi, coloque outro get ou um botão fora da dialog, só para q ele possa mudar de foco, senão não dá para validar Vagner Wirts Clipper 5.2 Lib 5.3 - Blinker 5.0 FW 2.0, Harbour 43.0 (Flex), xHarbour 99.1 99.2 99.3 (Simplex) FW 2.5 Quote Link to comment Share on other sites More sharing options...
Flavio A. Zago Posted November 6, 2006 Author Report Share Posted November 6, 2006 Obrigado Kapiaba e Vagner Farei isso, mas é estranho, pois funcionava perfeitamente na versão FWH26. []´s Flavio 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.