Also das hier ist der Code den ich gefunden habe (von Kaemmi is der uebigens, danke an dem Punkt
):
Delphi-Quellcode:
//im implementation-Abschnitt deklarieren
//das hier ist nur ein beispiel, das wahrscheinlich an die funktionen deiner DLL angepasst werden muss
type TTestFunction =
function(x,y:Integer):integer;
var DLLHandle:THandle;
Func:TFarProc;
TestFunction:TTestFunktion;
ergebnis:
string;
//laden der DLL
DLLHandle := LoadLibrary(Pchar(DLLName));
//DLLName mit dem eigentlichen Namen der DLL ersetzen, logisch
//Adresse einer Funktion ermitteln
Func := GetProcAddress(DLLHandle,'
cdtdraw');
//Wenn die Funktion gefunden wurde
if Func <>
nil then begin
@TestFunction := Func;
//Ausführen des Codes
ergebnis := IntToStr(TestFunction(4,5));
//übergeben der Parameter an die Funktion
Func:=nil;
//Freigeben der DLL
FreeLibrary(DLLHandle);
Ok ich schrieb dann mal n paar Begriffe die ich nich verstehe und wozu ich nix gefunden habe
-THandle (wozu genau is des gut?)
-TFarProc(garnicht in der Hilfe?) -> somit verstehe ich auch noch nicht ganz was es mit GetProcAddress auf sich hat, aber vielleicht erübrigt sich das ja wenn ich weiss was TFarProc ist)
Außerdem weiß ich nich ganz was genau das jetzt macht...wie zeige ich denn dann die Grafiken an??
Danke schonmal soweit