external const:'Name der DLL'

[Tonic1024]

Moin...

ich habe einige Funktionen die einen Teil-Datensatz formatieren. Wegen der besseren Übersicht und weil man ja nie ausschließen kann, dass User mal etwas anders haben wollen als man das selbst für richtig hält, habe ich diese Funktionen in eine DLL verfrachtet.

Delphi-Quellcode:

...
function FahrerFormat(gotten: string; referenz: TDatenArray):string;
  external 'Formate.dll';
...

Jetzt habe ich aber 'zig mal den String "Formate.dll" stehen. Ich habe natürlich versucht ihn durch eine Konstante zu ersetzen, jedoch ohne Erfolg.

Gibt es eine Möglichkeit, den String an einer Stelle zentral zu hinterlegen? Es soll ja garnicht variabel - wie auch? - sein...

bios denne...

[Luckie]

Und was hat dabei nicht geklappt?

[Tonic1024]

quasi so:

Delphi-Quellcode:

function FahrerFormat(gotten: string; referenz: TDatenArray):string;

implementation

const sowiso: string = 'Formate.dll';
 
function FahrerFormat(gotten: string; referenz: TDatenArray):string;
  external sowiso;

Resultat war:

Zitat von compiler:

[Fehler] HauptModul.pas(192): Konstantenausdruck erwartet

Hab mir gedacht, dass der Compiler vielleich zuerst die Funktionen bzw. Dll's nachsieht, und dann erst die Konstanten abfragt...

Gibts da keine Möglichkeit.

[choose]

schreibe nur
const sowiso = 'Formate.dll';

[Tonic1024]

Moin...

cool, kannte ich noch nicht... geht das auch mit ner Sammlung von Konstanten?

Bislang habe ich alle Dateien, die ich statisch brauche, in einem Record stehen...

[choose]

Was genau meinst Du mit einer

Zitat:

Sammlung von Konstanten

?

Du kannst mehrere Constanten definieren, sie müssen nur von einander verschiedene Namen besitzen. Sobald Du jedoch komplette "Konstantensätze" austauschen willst, also von

Delphi-Quellcode:

const1 = '...1';
const2 = '...2';

zu

Delphi-Quellcode:

const1 = '***1';
const2 = '***2';

kommst Du mit dieser Technik nicht weit.

Hier kannst Du dann ggf. Compilerbedingungen einsetzen oder, wenn Du ohnehin irgendwann vorhast, die Dateinamen zur Laufzeit aus einer Konfigurationsdati oä zu laden, die Referenzen mit LoadLibrary und GetProcAddress dynamsisch ermitteln.

[Tonic1024]

Ja, nee... ist schon klar...
Alles was zusammengehört habe ich halt gern zusammen.

etwa so:

Delphi-Quellcode:

type
 TProgramFiles = record
    INI: string;
    DBConLib: string;
    ...
  end;

const
  ProgramFiles : TProgrammFiles =
    (
      INI       : 'Programm.ini';
      DBConLib  : 'DBCnx.dll';
      ...
    );

Das meinte ich...

Ist aber wohl Geschmackssache

[Robert Marquardt]

Das Problem mit typisierten Konstanten in Delphi ist das sie als Variablen implementiert sind.
Deshalb die Fehlermeldung.
Erschwerend kommt hinzu das string voll dynamisch ist und daher eine heimliche initialization und finalization section zum Programm hinzugefuegt werden in der die globalen String-Variablen alloziiert bzw freigegeben werden.