Discussion :

[Jayceblaster]

Bonjour j'ai créé il y a queleque temps une DLL en pascal (avec DELPHI 2005) et aujourd'hui je doit l'utiliser pour un projet particulier ou j'aurai besoin de la charger en paralèlle... A la manière d'une classe en POO je voudrais etre capable de la charger plusieur fois....

En fait c'est une DLL qui permet de faire, entre autre, des sauvegardes dans un fichier texte.... et je voudrai etre capable de la charger par exemple 10 fois pour me générer au final 10 rapport texte différents..

J'ai essayé de renommer ma DLL avec 10 nom différent et de les charger dans mon programme mais cela ne marche pas un seul fichier et créé (car les variable intene a ma DLL ne correponde qu'a un seul emplacement mémoire et non 10 emplacement différents...

Quelqu'un voit-il comment je peux faire?

Merci d'avance...

[M.Dlb]

A mon avis c'est plus un problème de conception. Si tu as des procédures dans ta DLL qui ont des valeurs fixes (en particulier des noms de fichiers), pourquoi ne pas passer les noms de fichiers en paramètres de la procédure au lieu de les coder en dur ? Ainsi tu gagneras en fléxibilité, lors de l'utilisation de ta DLL.

[Jayceblaster]

Ben c deja fais... Tout ce fait par paramètre passé aux fonctions....
Mais si j'ai:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
  cheminSauvegarde(nomFichier: string);
  begin
     chemin:= nomFichier;  //rangement en variable globale
  end;

Si j'appelle N fois cette fonction avec des noms différents le nom donné lors de l'appel N vas écraser celui donné lors de l'appel N-1 car en mémoire ca correspond à un seul emplacement. (c'est pas la meme chose que si on a une classe qu'on instancie N fois et ou les variables se retrouveront dupliquées N fois en mémoire)

[M.Dlb]

Bne oui c'est logique. Si chemin est une variable globale à la DLL, et que la DLL est chargée qu'une seule fois, chemin sera écrasé à chaque appel... Il ne faut donc pas utiliser de variable globale dans ton cas...

[Jayceblaster]

tu crois que si j'ai aucune variable glogale ca marchera?

[M.Dlb]

Normalement oui, c'est fait pour ça une DLL

[Jayceblaster]

mais je pense pas que le problème vienne de la...
Regarde...Suposons que j'ai une DLL qui dispose de deux fonctions:
- une fonction qui calcul la somme de 2 entiers et me renvoie le resultat
- une fonction qui permet de sauvegarder le résultat

Soit le source:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
   add (a: integer, b:integer): integer; stdcall;
   begin
      add:= a+b;
   end;
 
   sauvegarde(nomFichier: string): stdcall;
   var
     fichier: textFile;
   begin
     AssignFile(fichier,nomFichier);
     reset(fichier);
     writeln(fichier,a+b); 
   end;
exports add, sauvegarde;

Comment faire pour sauvegarder le résultat de a+b si je passe pas par des variable globale?????

Ps: il est vrai qu'ici je pourai faire le calcul et tout de suite la sauvegarde mais dans le cas de ma DLL c'est impossible. En plus c'est une DLL incluant une fiche pour le composant TXmlDocument (elle génére de l'XML).

[M.Dlb]

Si tu dois utiliser plusieurs procédures, pourquoi ne pas les enchainer ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
   add (a: integer, b:integer): integer; stdcall;
   begin
      add:= a+b;
   end;
 
   sauvegarde(nomFichier: string): stdcall;
   var
     fichier: textFile;
   begin
     AssignFile(fichier,nomFichier);
     reset(fichier);
     writeln(fichier, add(a+b)); 
   end;
exports add, sauvegarde;

Comme ça c'est beaucoup plus flexible et tu ne passes pas par des variables locales. Ca doit être le même problème pour tes noms de fichiers

[Jayceblaster]

Je suis tout a fait d'accord avec toi.. Mais dans mon cas c'est impossible car entre l'appel de ma premiere fonction (création du répertoire et du fichier de sauvegarde du XML) et l'appel de ma derniere fonction (sauvegarde du fichier) j'ai plusieurs fonctions qui peuvent etre appelées N fois et dans un ordre différent en fonction de problème donné...
Il est donc pas possible de définir dans ma DLL l'ordre d'exécution des fonctions et donc je suis "obligé" (enfin j'ai rien trouvé d'autre) de passer par des variables globales....

[M.Dlb]

Ok... Je vois deux solutions alors :

- soit tu passes le nom de fichier à toutes procédures, au du moins un handle vers un fichier,
- soit tu stockes les handles dans un tableau en variable globale, tout en trouvant un moyen pour retoruver le bon fichier...

La solution du passage des handles est la plus simple pour moi, à vu de nez

[Eric Sigoillot]

Bonjour,

Tu utilises de manière incorrect le principe des DLL. Une DLL n'est pas destinée à stocker des infos mais à offrir une interface avec une bibliothèque de fonctions appelables par différentes entités.
Une DLL ne devrait avoir aucune variable globale, sauf dans un but d'interopérabilité entre les différentes entités en mesure d'appeler la DLL. De plus, rien ne peut garantir qu'un autre programme ne va pas utiliser ta DLL et appeler une fonction.

Tu dois donc complètement repenser ta manière de procéder : elle est foireuse, si je puis me permettre

Si une fonction renvoie un résultat, alors elle doit le fournir au programme appelant, ou tout au moins lui donner le moyen d'accéder à ce résultat (en utilisant de la mémoire dynamique par exemple).

@++