Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me serv ait
a gerer le contexte de l appli, et etait lancée au demarrage de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me serv ait
a gerer le contexte de l appli, et etait lancée au demarrage de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me serv ait
a gerer le contexte de l appli, et etait lancée au demarrage de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me servait
a gerer le contexte de l appli, et etait lancée au demarrage de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me servait
a gerer le contexte de l appli, et etait lancée au demarrage de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me servait
a gerer le contexte de l appli, et etait lancée au demarrage de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me servait
a gerer le contexte de l appli, et etait lancée au demarrage de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me servait
a gerer le contexte de l appli, et etait lancée au demarrage de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me servait
a gerer le contexte de l appli, et etait lancée au demarrage de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage de l
appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage de l
appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage de l
appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre, "KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" a écrit dans le message de news:
ejk4ck$ofr$Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage de l
appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre, "KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" <pascal.roy@sodalec.fr> a écrit dans le message de news:
ejk4ck$ofr$1@s1.news.oleane.net...
Cazaux-Moutou Philippe a écrit :
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage de l
appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre, "KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" a écrit dans le message de news:
ejk4ck$ofr$Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage de l
appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
> context:doInfos( )
Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" a écrit dans le message de news:
ejk4ck$ofr$Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage de
l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
> context:doInfos( )
Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :
Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" <pascal.roy@sodalec.fr> a écrit dans le message de news:
ejk4ck$ofr$1@s1.news.oleane.net...
Cazaux-Moutou Philippe a écrit :
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage de
l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
> context:doInfos( )
Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" a écrit dans le message de news:
ejk4ck$ofr$Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage de
l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
context:doInfos( )
J aurais pu penser ca mais le compilo n'en veut pas
il me renvoi ca comme erreur
Erreur :Pour accéder à un élément global de la classe 'C_Context', utilisez
l'opérateur '::' et la syntaxe 'C_Context::<ElémentGlobal>'.
W_Main, Initialisation, ligne 1, colonne 32
"Pascal ROY" a écrit dans le message de news:
ejrls0$d28$Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" a écrit dans le message de news:
ejk4ck$ofr$Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage de
l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
context:doInfos( )
J aurais pu penser ca mais le compilo n'en veut pas
il me renvoi ca comme erreur
Erreur :Pour accéder à un élément global de la classe 'C_Context', utilisez
l'opérateur '::' et la syntaxe 'C_Context::<ElémentGlobal>'.
W_Main, Initialisation, ligne 1, colonne 32
"Pascal ROY" <pascal.roy@sodalec.fr> a écrit dans le message de news:
ejrls0$d28$1@s1.news.oleane.net...
Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :
Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" <pascal.roy@sodalec.fr> a écrit dans le message de news:
ejk4ck$ofr$1@s1.news.oleane.net...
Cazaux-Moutou Philippe a écrit :
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage de
l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
context:doInfos( )
J aurais pu penser ca mais le compilo n'en veut pas
il me renvoi ca comme erreur
Erreur :Pour accéder à un élément global de la classe 'C_Context', utilisez
l'opérateur '::' et la syntaxe 'C_Context::<ElémentGlobal>'.
W_Main, Initialisation, ligne 1, colonne 32
"Pascal ROY" a écrit dans le message de news:
ejrls0$d28$Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" a écrit dans le message de news:
ejk4ck$ofr$Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage de
l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
> Pourquoi veux-tu qu'elle soit globale ?
Autant pour moi, j'avais pas vu le "GLOBAL" dans la déclaration de la
méthode !
Pourquoi veux-tu qu'elle soit globale ?
Cazaux-Moutou Philippe a écrit :context:doInfos( )
J aurais pu penser ca mais le compilo n'en veut pas
il me renvoi ca comme erreur
Erreur :Pour accéder à un élément global de la classe 'C_Context',
utilisez l'opérateur '::' et la syntaxe 'C_Context::<ElémentGlobal>'.
W_Main, Initialisation, ligne 1, colonne 32
"Pascal ROY" a écrit dans le message de news:
ejrls0$d28$Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" a écrit dans le message de news:
ejk4ck$ofr$Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage
de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
--
Pascal ROY
(Service Informatique - SODALEC)
> Pourquoi veux-tu qu'elle soit globale ?
Autant pour moi, j'avais pas vu le "GLOBAL" dans la déclaration de la
méthode !
Pourquoi veux-tu qu'elle soit globale ?
Cazaux-Moutou Philippe a écrit :
context:doInfos( )
J aurais pu penser ca mais le compilo n'en veut pas
il me renvoi ca comme erreur
Erreur :Pour accéder à un élément global de la classe 'C_Context',
utilisez l'opérateur '::' et la syntaxe 'C_Context::<ElémentGlobal>'.
W_Main, Initialisation, ligne 1, colonne 32
"Pascal ROY" <pascal.roy@sodalec.fr> a écrit dans le message de news:
ejrls0$d28$1@s1.news.oleane.net...
Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :
Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" <pascal.roy@sodalec.fr> a écrit dans le message de news:
ejk4ck$ofr$1@s1.news.oleane.net...
Cazaux-Moutou Philippe a écrit :
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage
de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
--
Pascal ROY
(Service Informatique - SODALEC)
> Pourquoi veux-tu qu'elle soit globale ?
Autant pour moi, j'avais pas vu le "GLOBAL" dans la déclaration de la
méthode !
Pourquoi veux-tu qu'elle soit globale ?
Cazaux-Moutou Philippe a écrit :context:doInfos( )
J aurais pu penser ca mais le compilo n'en veut pas
il me renvoi ca comme erreur
Erreur :Pour accéder à un élément global de la classe 'C_Context',
utilisez l'opérateur '::' et la syntaxe 'C_Context::<ElémentGlobal>'.
W_Main, Initialisation, ligne 1, colonne 32
"Pascal ROY" a écrit dans le message de news:
ejrls0$d28$Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" a écrit dans le message de news:
ejk4ck$ofr$Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage
de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
--
Pascal ROY
(Service Informatique - SODALEC)
Pourquoi veux-tu qu'elle soit globale ?
c est bien la mon pb, car j ai pas su faire autrement
as tu un tout petit exemple de code pour une classe ?
merci
"Pascal ROY" a écrit dans le message de news:
ejs1lu$jlt$Autant pour moi, j'avais pas vu le "GLOBAL" dans la déclaration de la
méthode !
Pourquoi veux-tu qu'elle soit globale ?
Cazaux-Moutou Philippe a écrit :context:doInfos( )
J aurais pu penser ca mais le compilo n'en veut pas
il me renvoi ca comme erreur
Erreur :Pour accéder à un élément global de la classe 'C_Context',
utilisez l'opérateur '::' et la syntaxe 'C_Context::<ElémentGlobal>'.
W_Main, Initialisation, ligne 1, colonne 32
"Pascal ROY" a écrit dans le message de news:
ejrls0$d28$Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" a écrit dans le message de news:
ejk4ck$ofr$Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage
de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
--
Pascal ROY
(Service Informatique - SODALEC)
Pourquoi veux-tu qu'elle soit globale ?
c est bien la mon pb, car j ai pas su faire autrement
as tu un tout petit exemple de code pour une classe ?
merci
"Pascal ROY" <pascal.roy@sodalec.fr> a écrit dans le message de news:
ejs1lu$jlt$1@s1.news.oleane.net...
Autant pour moi, j'avais pas vu le "GLOBAL" dans la déclaration de la
méthode !
Pourquoi veux-tu qu'elle soit globale ?
Cazaux-Moutou Philippe a écrit :
context:doInfos( )
J aurais pu penser ca mais le compilo n'en veut pas
il me renvoi ca comme erreur
Erreur :Pour accéder à un élément global de la classe 'C_Context',
utilisez l'opérateur '::' et la syntaxe 'C_Context::<ElémentGlobal>'.
W_Main, Initialisation, ligne 1, colonne 32
"Pascal ROY" <pascal.roy@sodalec.fr> a écrit dans le message de news:
ejrls0$d28$1@s1.news.oleane.net...
Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :
Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" <pascal.roy@sodalec.fr> a écrit dans le message de news:
ejk4ck$ofr$1@s1.news.oleane.net...
Cazaux-Moutou Philippe a écrit :
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage
de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
--
Pascal ROY
(Service Informatique - SODALEC)
Pourquoi veux-tu qu'elle soit globale ?
c est bien la mon pb, car j ai pas su faire autrement
as tu un tout petit exemple de code pour une classe ?
merci
"Pascal ROY" a écrit dans le message de news:
ejs1lu$jlt$Autant pour moi, j'avais pas vu le "GLOBAL" dans la déclaration de la
méthode !
Pourquoi veux-tu qu'elle soit globale ?
Cazaux-Moutou Philippe a écrit :context:doInfos( )
J aurais pu penser ca mais le compilo n'en veut pas
il me renvoi ca comme erreur
Erreur :Pour accéder à un élément global de la classe 'C_Context',
utilisez l'opérateur '::' et la syntaxe 'C_Context::<ElémentGlobal>'.
W_Main, Initialisation, ligne 1, colonne 32
"Pascal ROY" a écrit dans le message de news:
ejrls0$d28$Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" a écrit dans le message de news:
ejk4ck$ofr$Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et me
servait a gerer le contexte de l appli, et etait lancée au demarrage
de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
--
Pascal ROY
(Service Informatique - SODALEC)
Oui, si tu veux, en quelle version de Windev es-tu ?
Cazaux-Moutou Philippe a écrit :Pourquoi veux-tu qu'elle soit globale ?
c est bien la mon pb, car j ai pas su faire autrement
as tu un tout petit exemple de code pour une classe ?
merci
"Pascal ROY" a écrit dans le message de news:
ejs1lu$jlt$Autant pour moi, j'avais pas vu le "GLOBAL" dans la déclaration de la
méthode !
Pourquoi veux-tu qu'elle soit globale ?
Cazaux-Moutou Philippe a écrit :context:doInfos( )
J aurais pu penser ca mais le compilo n'en veut pas
il me renvoi ca comme erreur
Erreur :Pour accéder à un élément global de la classe 'C_Context',
utilisez l'opérateur '::' et la syntaxe 'C_Context::<ElémentGlobal>'.
W_Main, Initialisation, ligne 1, colonne 32
"Pascal ROY" a écrit dans le message de news:
ejrls0$d28$Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" a écrit dans le message de news:
ejk4ck$ofr$Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et
me servait a gerer le contexte de l appli, et etait lancée au
demarrage de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
--
Pascal ROY
(Service Informatique - SODALEC)
--
Pascal ROY
(Service Informatique - SODALEC)
Oui, si tu veux, en quelle version de Windev es-tu ?
Cazaux-Moutou Philippe a écrit :
Pourquoi veux-tu qu'elle soit globale ?
c est bien la mon pb, car j ai pas su faire autrement
as tu un tout petit exemple de code pour une classe ?
merci
"Pascal ROY" <pascal.roy@sodalec.fr> a écrit dans le message de news:
ejs1lu$jlt$1@s1.news.oleane.net...
Autant pour moi, j'avais pas vu le "GLOBAL" dans la déclaration de la
méthode !
Pourquoi veux-tu qu'elle soit globale ?
Cazaux-Moutou Philippe a écrit :
context:doInfos( )
J aurais pu penser ca mais le compilo n'en veut pas
il me renvoi ca comme erreur
Erreur :Pour accéder à un élément global de la classe 'C_Context',
utilisez l'opérateur '::' et la syntaxe 'C_Context::<ElémentGlobal>'.
W_Main, Initialisation, ligne 1, colonne 32
"Pascal ROY" <pascal.roy@sodalec.fr> a écrit dans le message de news:
ejrls0$d28$1@s1.news.oleane.net...
Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :
Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" <pascal.roy@sodalec.fr> a écrit dans le message de news:
ejk4ck$ofr$1@s1.news.oleane.net...
Cazaux-Moutou Philippe a écrit :
Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et
me servait a gerer le contexte de l appli, et etait lancée au
demarrage de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
--
Pascal ROY
(Service Informatique - SODALEC)
--
Pascal ROY
(Service Informatique - SODALEC)
Oui, si tu veux, en quelle version de Windev es-tu ?
Cazaux-Moutou Philippe a écrit :Pourquoi veux-tu qu'elle soit globale ?
c est bien la mon pb, car j ai pas su faire autrement
as tu un tout petit exemple de code pour une classe ?
merci
"Pascal ROY" a écrit dans le message de news:
ejs1lu$jlt$Autant pour moi, j'avais pas vu le "GLOBAL" dans la déclaration de la
méthode !
Pourquoi veux-tu qu'elle soit globale ?
Cazaux-Moutou Philippe a écrit :context:doInfos( )
J aurais pu penser ca mais le compilo n'en veut pas
il me renvoi ca comme erreur
Erreur :Pour accéder à un élément global de la classe 'C_Context',
utilisez l'opérateur '::' et la syntaxe 'C_Context::<ElémentGlobal>'.
W_Main, Initialisation, ligne 1, colonne 32
"Pascal ROY" a écrit dans le message de news:
ejrls0$d28$Non,
La formule est
context:doInfos( )
Bon courage
--
Pascal ROY
(Service Informatique - SODALEC)
Cazaux-Moutou Philippe a écrit :Voici ce que je fais
mais est ce bon ??
avant que j aille plus loin
et pour appeler la methode dans le prog je fais
context::doInfos()
est correct ??
context a l air d etre visible de tout le prog , est ce normal ??
merci de votre aide
----------------------------------------------------------------------------------------------
C_Context est une classe
GLOBAL
bAdmin est un booléen
FIN
PROCEDURE Constructeur()
PROCEDURE Destructeur()
// Syntaxe :
//doInfos ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE doInfos()
//Info(snom)
//InitParamètre(paramRegistre,
"KEY_CURRENT_USERSoftwaretototiti3.51")
sCheminRegistre est une chaîne // chemin proposée dans la base de
registres
// ----------------------------------------------------------------
// ----------------------- CODE EXECUTE ---------------------------
// ----------------------------------------------------------------
// On récupère le chemin dans la base de registres proposé par WinDev
sCheminRegistre = "HKEY_CURRENT_USERSoftwareC2iKaraibes" +
ProjetInfo(piConfiguration) //ProjetInfo(piRegistre)
// Création d'une clé "test"
RegistreCréeClé(sCheminRegistre + "" + "Settings")
RegistreCréeClé(sCheminRegistre + "" + "Path")
RegistreCréeClé(sCheminRegistre + "" + "Base")
// Vérification de l'opération
SI ErreurDétectée ALORS
Erreur("Une erreur est survenue pendant la création de la clé
""Test""",ErreurInfo())
RETOUR
FIN
// Syntaxe :
//[ <Résultat> = ] isAdmin ()
//
// Paramètres :
// Aucun
// Valeur de retour :
// booléen : // Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
FONCTION GLOBALE isAdmin()
RENVOYER ::bAdmin
// Syntaxe :
//SetAdmin (<bPAdmin> est booléen)
//
// Paramètres :
// bPAdmin (booléen) : <indiquez ici le rôle de bPAdmin>
// Valeur de retour :
// Aucune
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE GLOBALE SetAdmin(bPAdmin est un booléen)
::bAdmin = bPAdmin
----------------------------------------------------------------------------------------------
"Pascal ROY" a écrit dans le message de news:
ejk4ck$ofr$Cazaux-Moutou Philippe a écrit :Bonjour
Comment faire ca en Windev ?
Venant de delphi, dans mes appli, je faisiais ceci
une classe, que je nommais
_Context
et dedans des methodes, cette classe etait publique a l' appli et
me servait a gerer le contexte de l appli, et etait lancée au
demarrage de l appli
et j appelais les mthode comme ceci
ex
maVarCheminPhoto = _Context.CheminPhoto
dans _Context, je declarais les choses comme ceci
fDemo: Boolean;
puis
property Demo: boolean read fDemo write fDemo;
le lisais ensuite la bdr comme ca
fDemo:= fIni.ReadBool('Settings', Demo, True);
pui je stockais les valeur dans la BDR
fIni.ReadBool('Settings', Demo, fDemo);
comment faire pareil ?
Pour lire les fichiers INI en Windev c'est IniLit ( iniecrit pour...
ecrire ;-) )
Ces fonctions renvoie des chaines, a toi de faire du transtypage.
La notion de "Propiété" n'existe pas dans Windev
Les classes Windev sont des plus sommaires, niveau Turbo Pascal 7.0
et encore... ;-)
Attention, dans l'utilisation des classes allouées en mémoire,
avec la version 10, j'ai quelques soucis. Plantage en lecture
de fichiers (certes des fichiers DBf :-) ) si j'ai beaucoup
d'objets alloués en mémoire. Méfiance donc.
--
Pascal ROY
(Service Informatique - SODALEC)
--
Pascal ROY
(Service Informatique - SODALEC)
--
Pascal ROY
(Service Informatique - SODALEC)
