DLL soll Funktion aus Main-Application ausführen

[argonix]

Hallo! Seit einiger Zeit beschäftige ich mich mit DLL-Programmierung. Wie die Main-Anwendung Funktionen aus der DLL ausführen kann weis ich, aber geht das auch umgekehrt? Wie kann die DLL eine Funktion der Anwendung ausführen?

[CalganX]

Hi,
das sollte über Interfaces möglich sein. Zwei Artikel, die dafür nützlich sein könnten: Einführung in Interfaces und sakuras Plugins-Tutorial. Ein konkretes Beispiel zu letzterem könntest du auch hier finden.

Chris

[mkinzler]

Man könnte es auch mit callbacks-Funktionen versuchen.

[Eichhoernchen]

übergib doch einfach einen Pointer auf die Funktion an die DLL und diese führt die dann aus.

Delphi-Quellcode:

Dll:


Main Program:

function dosth(blub: integer): integer;
begin
..
end;

type
  TInit = procedure (func: Pointer);

function getgunction(name: pchar): Pointer;
begin
  if name = 'dosth' then
    result := @dosth;
//etc...
end;

var
  init: TInit;
begin
  //DLL laden
  //init funktion in der DLL aufrufen:
//init laden
  init(@getfunction); 
end.


Dll:
type
  TFunc = function (name: pchar): Pointer;
  TDoSth = function (blub: integer): integer;

var
  getfunc: TFunc;
  dosth: TDoSth;  
 
procedure init(func: Pointer);
begin
  @getfunc := func;
  @dosth := getfunc('dosth');
  dosth(..);
end;

exports
  init;

begin
end.

[mkinzler]

Zitat:

übergib doch einfach einen Pointer auf die Funktion an die DLL und diese führt die dann aus.

Was man im Allgemeinen als callback bezeichnet :)

[Luckie]

Deklarier die Funktion im Exports-Abschnitt der Exe. Ist zwar sehr ungewöhnlich, da aber DLL und Exe das gleiche Format haben, kann man eine Exe auch als DLL behandeln.

[argonix]

Das mit den Interfaces ist interessant, da damit auch nicht-Delphi-Programmierer DLL-PlugIns für mein Prog erstellen können. Gibt es irgendwo eine Art Demo-Anwendung, wo man das "Live" sehen kann?

[argonix]

Das ganze läuft jetzt doch :oops:
Vielen Dank für die Hilfe!