Inno Setup - Problème appel Dll

**mactwist69** · 06/12/2010, 11h35

Bonjour tout le monde,

Bon, alors déjà je suis débutant en Delphi et InnoSetup. J'ai "hérité" d'un projet InnoSetup qui installe un projet de mon entreprise.

On m'a fais une démonstration courte de comment ça fonctionne, hélas sans le tester et la personne est partis.

Or au premier test, au lancement du Setup, bimmm un problème:

Code :

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

1
2
Runtime Error (at -1:0):
Cannot Import dll:C:\DOCUMENT~1\Rd\LOCAL.....\IPUtils.dll

Je suis donc allez voir dans le code, j'ai trouvé:

Code :

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

1
2
[Files]
Source: "..\Setup Files Global\IPUtils.dll";  DestDir: {tmp}; Flags: dontcopy;

Or si je me déplace un dossier au dessus, dans Setup Files Global, la dll existe bien.

Dans le code plus loin il y a:

Code :

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

1
2
function GetLocalIPAddress: PChar;
external 'GetLocalIPAddress@files:IPUtils.dll stdcall';

Ce que j'ai compris de ça, c'est que à l'installation, l'instaleur fais appel a la dll, c'est pourquoi il place la dll dans "tmp".

Question: pourquoi ne trouve il pas la dll ? Pourquoi le flag est a "dont copy" ?

Je vous remercie d'avance.

**Cl@udius** · 06/12/2010, 12h43

Salut

Envoyé par mactwist69

Pourquoi le flag est a "dont copy" ?

Ce flag précise que cette DLL sera ignorée pendant la phase de copie des fichiers. Elle ne sera donc pas copiée sur la machine cible, mais utilisée uniquement pendant la phase d'installation et supprimée en fin d'installation.

A noter que le DestDir: {tmp} me semble inutile.

pourquoi ne trouve il pas la dll ?

Tu peux nous montrer la partie du code qui appelle ta fonction.

@+ Claudius.

**mactwist69** · 06/12/2010, 14h00

Merci pour la réponse très compréhensive:

Le code qui fait appel a la fonction (qui fait appel a la DLL):

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
{ EditIpMachine }
  EditIpMachine := TEdit.Create(Page);
  with EditIpMachine do
  begin
    Parent := Page.Surface;
    Left := ScaleX(224);
    Top := ScaleY(111);
    Width := ScaleX(153);
    Height := ScaleY(21);
    TabOrder := 1;
    Text := GetLocalIPAddress();
  end;

Le truc c'est que cette partie là était "censé" marcher à la base... Je n'ai pas rajouter de code...

**Cl@udius** · 06/12/2010, 14h41

Bon rien de spécial dans l'appel.

Je ne vois a priori pas d'erreur dans le script.
Donc il faut chercher ailleurs:

La DLL fait-elle appel à d'autres DLLs (dépendances)
Ta DLL est 32 ou 64 bits ?
Ton environnement de déploiement est-il 32 ou 64 bits ?

Voilà pour les questions en vrac qui me viennent à l'esprit.

Visiblement il trouve la DLL, mais il n'arrive pas à la charger.

@+ Claudius.

**mactwist69** · 06/12/2010, 14h51

Et bien c'est bien ce qui me fait peur...

Rien de spécial, la dll est indépendante. L'environnement de développement n'a pas changé depuis que j'ai repris le projet...

Je suis dans la mouise !! lol

**Andnotor** · 06/12/2010, 15h48

{tmp} est un répertoire créé par IS et ne correspond pas à la variable d'environnement.
Les exemples utilisant des DLL ne spécifient pas de DestDir. Comme le dis Claudius, supprime-le.

**mactwist69** · 06/12/2010, 15h57

Petite question.... Le dossier qui contient le projet Inno setup et les dlls et autres ont été déplacé dans l'arborescence.

N't aurait il pas par exemple a inscrire la dll dans la base de registre ou quelque chose comme ca ?

**Andnotor** · 06/12/2010, 16h02

Pas sur l'export de fonctions. S'il s'était agit d'une DLL automation, ce serait une autre histoire

Le script IS n'a pas été modifié. Mais la DLL ? A-t-elle encore cette fonction exportée ?

**mactwist69** · 06/12/2010, 16h11

Et bien en réalité, la dll n'a pas changé depuis 5 ans. (je ne sais meme pas si elle a été créer par nous)

Le Script InnoSetup a bien été changé, mais ce que je voulais dire, c'est que les changements ont juste été: l'ajout d'icone ou de trucs comme ça. le [code] n'a pas été changé.

Juste de l'ajout de fichiers.

Rien a propos de cette dll qui doit être présente depuis le début.

**Cl@udius** · 06/12/2010, 16h23

Re,

J'ai réussi à reproduire le même message d'erreur (Runtime Error (at -1:0):
Cannot Import dll), simplement en appelant une fonction/procédure absente de la DLL.

Vérifie que tu pointes sur la bonne DLL (section [Files]). Cela ne semble pas être le cas.

@+

**mactwist69** · 06/12/2010, 16h34

Merci pour l'info, je vais chercher dans ce sens !

**mactwist69** · 06/12/2010, 16h56

J'ai créer un projet VB pour tester l'appel de fonction:

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
Module Module1
 
    Declare Function GetLocalIPAddress Lib "C:\Documents and Settings\dp\Bureau\Pb install\IPUtils.dll" () As String
 
    Public Function Appel_dll()
 
        Try
            Return GetLocalIPAddress()
        Catch ex As Exception
            Return ""
        End Try
 
    End Function
 
End Module

Et, j'ai presque envie de dire malheureusement, ca marche. Il me trouve l'ip de ma machine...

**Cl@udius** · 06/12/2010, 17h15

Dans ton script, utilise ce chemin d'accès vers la DLL:

Code :

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

1
2
[Files]
Source: "C:\Documents and Settings\dp\Bureau\Pb install\IPUtils.dll"; Flags: dontcopy;

Fais un test, pour être sûr.

**mactwist69** · 06/12/2010, 17h19

Ça fais pareil...

Je crois que je vais recreer une dll qui fais la même chose...

EDIT 1:
J'ai essayer ca aussi, meme resultat:

Code :

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

Source: "..\Setup Files Global\IPUtils.dll";  DestDir: "{app}"; Flags: ignoreversion;

EDIT 2:

J'ai un deuxième script d'installe qui utilise également la dll, et comma par hasard, il n'arrive pas non plus a ouvrir ce fichier...

Il doit y avoir un truc avec cette dll

**Cl@udius** · 06/12/2010, 17h26

Envoyé par mactwist69

Ça fais pareil...

Là je suis à court d'argument.

Tiens nous au courant.

[edit]

Il doit y avoir un truc avec cette dll

P'têt ben !

**mactwist69** · 07/12/2010, 16h10

Holla mes chers confrères, j'ai de bonne nouvelles !

J'ai par la suite pensé que le problème venait de McAfee (nouvellement installé chez moi). Et c'était pas loin d'être faux car il y a dans les règles, une en particulier qui interdit l’exécution de fichiers dans "temp". Or inno Setup utilise ce dossier temporaire pour décompresser ce dont il a besoin.

Mais le problème persistait. donc récapitulons: Dll ok, antivirus ok, droit ok, script ok.

J'ai donc désinstaller Inno Setup 5.4 released et réinstaller la version de mon prédécesseur à savoir 5.3.

Et bimmm, ça marche ! (problème de compatibilité entre cette dll en particulier et cette version d'inno setup ?)

Merci a tous en tout cas de m'avoir permis d'avancer dans la résolution de cette erreur.