1 pièce(s) jointe(s)
Importer une DLL Matlab dans Delphi
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:
1
2
| function y = foo(x)
y = 2*x |
et voici le code Delphi:
Code:
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:
Citation:
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
