Discussion :

[123djimy]

Salut,
J'ai essayé de faire appel à une fonction foo.m contenue dans une DLL mylib.dll construite par Matlab,

Voici le code Matlab:

Code :

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

1
2
function y = foo(x)
y = 2*x

et voici le code Delphi:

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
16
procedure TForm1.Button1Click(Sender: TObject);
var
   a,b:double;
   DLLHandle: Thandle;
   foo: Function (Num:double):double; {$IFDEF WIN32} cdecl; {$ENDIF}
begin
   DLLHandle := LoadLibrary('mylib.dll');
   try
       @foo := GetProcAddress(DLLHandle, 'foo');
       a:=StrToFloat(edit1.Text);
       b:=foo(a);
       edit2.Text:=FloatTostr(b);
   finally
     FreeLibrary(DLLHandle);
   end
end;

mais lors de l'exécution j'ai eu une exception:

Exception class EAccessViolation with message 'Access violation at address 00000000. Read of address 00000000'.

je ne trouve pas de solution pour ce problème,
Merci d'avoir m'aider

[Ph. B.]

Bonjour,

Je pense que vous n'avez pas regardé la documentation fournie avec Matlab.

Après une rapide analyse avec un outil comme Dependency Walker, j'ai constaté que :

1. votre dll nécessitait la présence d'au moins une dll annexe, surement fournie par MatLab : MCLMCRRT713.DLL (MatLab Compiler Runtime ?),
2. votre dll exporte plusieurs fonctions avec une convention d'appel de type C (cdecl, stdcall ou safecall pour Delphi, le 1° choix me parait à priori le plus pertinent) :
   
   • _mlfFoo
   • _mlxFoo
   • _mylibGetMcrID
   • _mylibInitialize
   • _mylibInitializeWithHandlers
   • _mylibPrintStackTrace
   • _mylibTerminate

Cela amène 3 remarques supplémentaires :

1. votre dll a peut être besoin d'être initialisée avant toute autre opération (fonctions _mylibInitialize*) et libérée en fin de traitement (fonction _mylibTerminate)
2. votre dll exporte 2 fonctions qui devraient correspondre à ce que vous avez défini dans MatLab (_mlfFoo et _mlxFoo : à confirmer f pour float, x pour eXtended ?)
3. votre dll est native ou managée ?

En conclusion, RTFM ou LCPM pour les francophones...
Et vous fournira également des pistes...

[123djimy]

Bonjour, je vous remercie pour votre réponse.
Je pense que ce n'est pas possible d'utiliser une DLL Matlab avec Delphi.
-Est ce qu'il y a une autre solution pour intégrer les fonctions écrites par Matlab dans mon projet?

[ShaiLeTroll]

N'existe-t-il pas un ActiveX MatLab qui serait peut-être plus simple que l'utilisation directe de la DLL
Il y a un mode OLE puisqu'il existe un 'matlab.application'

Le Section MATLAB sera peut-etre plus précise que la section Delphi