Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Críticas - Mensagem de Erro
Message
From
12/01/2005 16:09:00
 
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Environment versions
Visual FoxPro:
VFP 9
Database:
Visual FoxPro
Miscellaneous
Thread ID:
00976252
Message ID:
00976570
Views:
14
>
>Ok, eu sei disso... mas estou pensando em deixar a regra por conta dos Triggers mesmo... Ainda que o trigger dispare o "objeto"...
>
>Dessa maneira não tem jeito... se alguém em modo interativo abrir a tabela e quiser alterar, será criticado...
>
>Eu estou estudando as formas de receber essas mensagens... a variável pública foi só para exemplificar, o ideal é um objeto controlando isso ou algo do tipo...
>
Beleza.. Então "jogue" objetos de validação dentro do seu _screen toda vez que abrir o V.F.P.

No seu CONFIG.FPW
command = do setstartup
No seu programa inicial
procedure setstartup
if  version(2)=2
    set classlib to x:\minhapasta\classe_validacao additive
else
    set classlib to classe_validacao additive
endif
if  type("_screen.oMeus_validadores")="U"
    _screen.addproperty("oMeus_validadores", createobject("validarores"))
endif
e no uso cotidiano:
_screen.oMeus_validadores.checa_validade_CGC("01004005000154")
è Isto!! Obviamente você terá que criar seu objeto "validadores" dentro da biblioteca "classe_validacao".. E os metodos respectivos

Claudio
"Now to him who is able to do immeasurably more than all we ask or imagine, according to his power that is at work within us, Ephesians 3:20
Previous
Reply
Map
View

Click here to load this message in the networking platform