Information générale
Catégorie:
Codage, syntaxe et commandes
Claudio,
Obrigado pela atenção.
Segue o meu código:
Método init do formulário:
*** Verifica estados atuais dos ítens configuráveis ***
* Ítem que permite níveis menores trabalhar sob autorização
If LeConfig("nivel_menor_que_exigido_sob_autorização") = "sim"
ThisForm.Páginas1.Page1.Opções1.Option1.value = 1
ThisForm.Páginas1.Page1.Opções1.Option2.value = 0
Else
ThisForm.Páginas1.Page1.Opções1.Option1.value = 0
ThisForm.Páginas1.Page1.Opções1.Option2.value = 1
EndIf
* Atualiza o formulário
ThisForm.Refresh
Método Click do botão Ok ( que fecha o formulário )
* Muda a configuração conforme a opção do usuário
If ThisForm.Páginas1.Page1.Opções1.Option1.Value = 1 and ThisForm.Páginas1.Page1.Opções1.Option2.Value = 0
EscreveConfig("nivel_menor_que_exigido_sob_autorização","sim")
Else
EscreveConfig("nivel_menor_que_exigido_sob_autorização","não")
EndIf
DoDefault()
Minha lógica:
Vc deve ter percebido as duas funções LeConfig() e EscreveConfig(), pois bem, elas foram feitas p'ra que fossem lidas e escritas respectivamente as situações de alguns ítens configuráveis do sistema, tais configurações residem em um arquivo que tem uma linha dedicada a cada ítem na seguinte forma:
< cNomeÍtem > = < cStatusdoÍtem >
o arquivo tem o formato texto, e as funções foram feitas para ler e escrever no referido arquivo; as funções foram textadas à contento, e o formulário funciona corretamente dentro do VFP 7.0, mas quando uso o BUILD, e produzo a versão compilada o formulário "funciona", mas não consegue Escrever no tal arquivo, não sei se por estar usando arquivo texto, deveria tratá-lo com as funções de baixo nível, seria isso, nunca usei as funções de baixo nível.
Agradeço antecipadamente cada ajuda.
Abraço,
Fernando Pinho.
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement