Bei external-Deklaration, konstantenausdruck erwartet

[MrKnogge]

Hallo !

Ich habe in meinem Programmordner ein Verzeichniss namens "PlugIns",
dort befinden sich mehrere PlugIn's, soweit keine Probleme (sakura's Tutoral sei :thuimb: ),
aber nun muss ich aus einer DLL auf eine funktion aus der Anwenung zugreifen,
also hab ich mir ne function geschrieben, die mir den übergeordneten Ordner liefert,
aber nun verlangt er bei der Deklaration den vollständigen Pfad als konstante !

Könnt ihr mir weiterhelfen ?

[Christian Seehase]

Moin MrKnogge,

wie wär's denn mit ein klein wenig Sourcecode? ;-)

[MrKnogge]

Zitat:

Zitat von Christian Seehase

Moin MrKnogge,

wie wär's denn mit ein klein wenig Sourcecode? ;-)

Aber sicher doch:

Anwenung:

Delphi-Quellcode:

...

function GetZahl: PInteger;
begin
  result := @Zahl;
end;

exports
  GetZahlUser,

DLL:

Delphi-Quellcode:

...

function GetITDirectory(): string;
var
  path: string;
begin
  path := ExtractFilePath(ParamStr(0));
  path := Copy(path,0,length(path)-1);
  while path[length(path)] <> '\' do
    path := Copy(path,0,length(path)-1);
end;

function GetZahl: PInteger; external GetITDirectory + MeinProgramm.exe; 

...

Mit GetITDirectory möchte ich das übergeordnete Verzeichniss herrausbekommen, beispiel:
Diese Datei:
C:\Programme\MeinProgramm\PlugIns\MeinPlugIn.dll
braucht diese:
C:\Programme\MeinProgramm\MeinProgramm.exe

[Chewie]

external ist eine Direktive, die zur Kompilierzeit ausgewertet wird. Und dort wird der Code noch nicht ausgeführt. Deshalb können nur konstante Namen für die statische Bindung verwendet werden.

Für dich kommt wohl das [dp="DLL dynamisch"]dynamische Einbinden[/dp] in Frage.

[MrKnogge]

hm, schade.

Wenn es andersherum gewesen wäre, hätte ich ja beispielsweise 'PlugIns\Plugin.dll' schreiben können, und ich dachte zu sowas gibts auch n gegenteil, aber '..\MeinProgramm.exe' funzt nicht.

Danke für den Tip, dann binde ich's eben Dynamisch ein. Sollte jemand noch ne andere Idee haben, immer her damit :-D