Unterfunktionen in DLL

[sko1]

Hallo,

erste Versuche mit DLL's waren erfolgreich, ich kann Funktionen deklarieren und aus einem anderen Programm aufrufen.

Jetzt aber kommt ein Problem, welches wahrscheinlich so trivial ist, dass ich es in der Suche nicht gefunden habe, ich möchte innerhalb der DLL Proceduren verwenden, weiß aber nicht wo ich die deklarieren kann, einen implementation - Abschnitt gibt es ja nicht!

Also als Beispiel:

Delphi-Quellcode:

function DLLFunktion1
begin
  (benutzt Unterfunktion 1)
end;

function DLLFunktion2
begin
  (benutzt Unterfunktion 1)
end;

procedure Unterfunktion1
begin
...
end;

führt zu "undeklarierter Bezeichner Unterfunktion1"

Irgendwo (und da weiß ich nicht wo) muss ich ja über der DLLFunktion1 schon mal Unterfunktion1 deklarieren?
Klar könnte ich die Unterfunktion1 oberhalb DLLFunktion1 schreiben, aber irgendwo wird dann immer die Reihenfolge "kneifen"!

Ciao
Stefan

[Fritzew]

Packe Deine "Unterunktionen" in eine extra Unit, und binde Diese in das DllProjekt ein....
DLL:

Delphi-Quellcode:

library mydll;

uses
  System.SysUtils,
  System.Classes,
  dllFuncs in 'dllFuncs.pas';

{$R *.res}


 procedure dllfunc(const i : integer); stdcall;
 begin
    Unterfunktion1(i);
 end;



exports
  dllfunc;

begin
end.

Unit:

Delphi-Quellcode:

unit dllFuncs;

interface


  procedure Unterfunktion1(const i : integer);

implementation

 procedure Unterfunktion1(const i : integer);
 begin

 end;

end.

[DeddyH]

Wichtig ist dabei, dass die Prototypen (Deklarationen) im interface-Abschnitt stehen.

[sko1]

Vielen herzlichen Dank!

Da hätte ich eigentlich selbst drauf kommen können!

Ciao
Stefan

[jaenicke]

Übrigens musst du die DLL-Funktionen auch nicht alle direkt in der .dpr deklarieren. Du kannst die exports-Sektion auch in einer Unit unterbringen.
(Bei wenigen Funktionen ist das egal, aber wenn es zu viele werden, ist es dann übersichtlicher.)

[sko1]

Danke für den Tip!

Das hatte ich schon gefunden, was mich ärgert ist, dass man nicht

Delphi-Quellcode:

exports 
  DLLFunktion1;
  DLLFunktion2;
  DLLFunktion3;

schreiben kann sondern jedes Einzeln, wo dann die automatische Formatierung dann noch Leerzeilen reinpackt:

Delphi-Quellcode:

exports DLLFunktion1;

exports DLLFunktion2;

exports DLLFunktion3;

Ciao
Stefan

[himitsu]

Doch, kann man.

Delphi-Quellcode:

exports
  DLLFunktion1,  // Liste = Komma ;)
  DLLFunktion2,
  DLLFunktion3;

Zitat von DeddyH:

Wichtig ist dabei, dass die Prototypen (Deklarationen) im interface-Abschnitt stehen.

Nee, nicht unbedingt.

Ins Interface kommt idealer Weise nur Zeug rein, was "öffentlich" ist.


* Die Reihenfolge der Prozeduren Ändern ... die Definition muß immer "irgendwo" vorher/darüber sein, bevor man es verwenden kann.

Delphi-Quellcode:

procedure Unterfunktion1;
begin
...
end; 

function DLLFunktion1;
begin
  (benutzt Unterfunktion 1)
end;

function DLLFunktion2;
begin
  (benutzt Unterfunktion 1)
end;

* implizit als Forward im Interface

Delphi-Quellcode:

interface

procedure Unterfunktion1;

implementation

function DLLFunktion1;
begin
  (benutzt Unterfunktion 1)
end;

function DLLFunktion2;
begin
  (benutzt Unterfunktion 1)
end;

procedure Unterfunktion1;
begin
...
end;

* explizit als Forward in der Implementation

Delphi-Quellcode:

procedure Unterfunktion1; forward;

function DLLFunktion1;
begin
  (benutzt Unterfunktion 1)
end;

function DLLFunktion2;
begin
  (benutzt Unterfunktion 1)
end;

procedure Unterfunktion1;
begin
...
end;

* oder eben "vorher" in eine andere Unit und da natürlich öffentlich im Interface, wobei "vorher" sich hier auf den jeweiligen USES-Abschnitt bezieht.

Zitat von jaenicke:

Übrigens musst du die DLL-Funktionen auch nicht alle direkt in der .dpr deklarieren. Du kannst die exports-Sektion auch in einer Unit unterbringen.
(Bei wenigen Funktionen ist das egal, aber wenn es zu viele werden, ist es dann übersichtlicher.)

Man kann die Exports auch in der DPR lassen und nur die Funktionen in die Units verschieben.

Was man übersichtlicher hält, mag Geschmackssache sein.
* EXPORTS dort, wo die Funktionen sich befinden
* oder alle EXPORTS in der DPR (Funktionen in der DPR oder in einer/mehreren Units)

[sko1]

Delphi-Quellcode:

exports
  DLLFunktion1, // Liste = Komma ;)
  DLLFunktion2,
  DLLFunktion3;

danke!
Man lernt nie aus

Ciao
Stefan