ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

Forum AtoutFox : Re: Private All Except ...   

Sujet

rss Flux RSS des derniers messages

Vous devez vous identifier pour pouvoir poser une question ou répondre.

lun. 10 février 2020, 16h06

Francis Faure
France France

atoutfox.public.association

Re: Private All Except ...

Bonjour Luc,

essayer :

private all _*
  private all g*


test :

clear

_tonton = 1
gTata = 2

do down

"Main", _tonton, gTata && Displays "Main", 1, 2

procedure down
  private all _*
  private all g*
  _tonton = 50
  gTata = 100
  ? "Down", _tonton , gTata && Displays "Down", 50, 100
endproc


Mais ce n''est pas beau du tout... mieux vaudrait privatiser les variables utilisées dans la procédure :

Private gTata, gTonton, ....
Voir même un "LOCAL var1, ...." serait mieux ?

Cordialement
Francis



Permalink : http://www.atoutfox.org/nntp.asp?ID=0000019546
20 088 messages dans le forum • Liste complète des messages

Publicité

Les pubs en cours :

www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2024.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0-SP2-HF3