Aus der Ini-Datei des benutzten Programmes lesen

[Freyr77]

Hallo!

Die ganze Sache ist etwas kompliziert zu erklären, ich versuche es mal.

Mein Programm zieht sich Tabellen aus der Datenbank und schreibt diese geordnet in eine Datei. Besser gesagt in eine Applikation.
Ich bin mit den ParamStr() Befehlen noch nicht so vertraut, diese sind aber in dem Programm eingebaut. ParamStr(0) ist ja der Pfad meiner Programm-Exe, oder? Und ParamStr(1) soll hier den Pfad der Applikation ausspucken, mit der das Programm gerade verknüpft ist. (es gibt zwei Applikationen, für die das Programm gebaut wurde, und das Programm soll immer wissen wo es gerade läuft.)

Nun muss ich den Server aus der Applikations-Ini lesen, die eben gerade angesprochen wird. Wie mache ich das? Mit ParamStr(1)+'irgendeineIni' würde ich dem Programm gerne sagen aus welcher Ini es lesen soll, es funktioniert nur gerade nicht so wie geplant. Momentan sieht das so aus:

Delphi-Quellcode:

  lServer: string;
  lIniFile: TIniFile;
  lIniFileName: string;

lIniFile := TIniFile.Create(lIniFileName);
lIniFileName := ExtractFilePath(ParamStr(1)) + 'irgendeineIni';

lAppName := ParamStr(1).Substring('/Alias:'.Length);
lServer := lIniFile.ReadString(lIniFileName,'Database', 'Server');


 lProps := TSQLDBNexusDBConnectionProperties.Create
      (lServer+':16000/'+lAppName, '', '', ''); <---- hier soll der Server eingetragen werden!

Kann mir jemand, der mein Gewaff verstanden hat, sagen wie ich das zum Laufen bringe und wo ich diesen ParamStr(1) Befehl definiere, also wie ich angeben kann was da drin stehen soll?

[p80286]

Nun Deine Annahmen sind nicht ganz richtig.

Zitat:

Unter Windows gibt ParamStr(0) den Pfad und den Dateinamen des ausgeführten Programms zurück (z.B. C:\TEST\MYPROG.EXE).

Unter D10 scheint die OH verloren gegangen zu sein?

Mit Paramstr(1) bekommst Du den ersten übergebenen Parameter, mit Paramstr(2) den zweiten usw.

Zitat:

Und ParamStr(1) soll hier den Pfad der Applikation ausspucken, mit der das Programm gerade verknüpft ist.

Dann sollte beim Aufruf auch der Pfad der Applikation mitgegeben worden sein.

Was funktioniert den nicht? Gibt es eine Fehlermeldung?

[Jumpy]

[QUOTE=Freyr77;1338686]Hallo!

Delphi-Quellcode:

  lServer: string;
  lIniFile: TIniFile;
  lIniFileName: string;

lIniFile := TIniFile.Create(lIniFileName);
lIniFileName := ExtractFilePath(ParamStr(1)) + 'irgendeineIni';

Die Reihenfolge der beiden Befehle sollten geauscht werden, sonst kann das ja gar nicht klappen...

[Freyr77]

Die Reihenfolge ist nur falsch rüber kopiert von mir, sorry

[Freyr77]

Zitat von p80286:

Nun Deine Annahmen sind nicht ganz richtig.

Zitat:

Unter Windows gibt ParamStr(0) den Pfad und den Dateinamen des ausgeführten Programms zurück (z.B. C:\TEST\MYPROG.EXE).

Unter D10 scheint die OH verloren gegangen zu sein?

Mit Paramstr(1) bekommst Du den ersten übergebenen Parameter, mit Paramstr(2) den zweiten usw.

Zitat:

Und ParamStr(1) soll hier den Pfad der Applikation ausspucken, mit der das Programm gerade verknüpft ist.

Dann sollte beim Aufruf auch der Pfad der Applikation mitgegeben worden sein.

Was funktioniert den nicht? Gibt es eine Fehlermeldung?

Im Prinzip geht es mir erst einmal darum wo ich in der IDE die Parameter angeben kann, also wo ich bestimmen kann was ParamStr(1) überhaupt ist.

[Klaus01]

.. schau mal unter run - Parameters

Grüße
Klaus

[Freyr77]

Ich muss quasi irgendwie den Pfad von Paramstr(1) auslesen können, damit ich in den Exe-Pfad und somit an die Ini ran komme.

[hoika]

Hallo,
so richtig verstanden habe ich es auch nach mehrerem Lesen nicht.
Bitte das ganze mal ohne Quelltext erklären.

Vielleicht hilft das ja:
< Im Prinzip geht es mir erst einmal darum wo ich in der IDE die Parameter angeben kann, also wo ich bestimmen kann was ParamStr(1) überhaupt ist. >

Start->Parameter
ParamStr(1) ist der erste Parameter
ParamStr(0) macht Windows automatisch.

[Sir Rufo]

Die übergebenen Aufrufparameter erhälst du mit ParamStr.

Übergibst du keinen Parameter, kannst du lesen sooft du willst, du bekommst keinen. Automatisch werden keine Parameter übergeben.

Und warum willst du die aufrufende Exe als Parameter übergeben um von der Angabe eine Konfigurationsdatei herzuleiten? Übergib doch einfach den Pfad zur Konfigurationsdatei...

Code:

foo.exe "C:\bar\foobar.ini"

Eventuell möchtest du aber auch etwas ganz anderes haben. Nämlich den Aufrufkontext (Welcher Prozess hat diese Anwendung gestartet). Das ist aber ein ganz anderes Thema und diesem ist mit ParamStr nicht beizukommen.

[Freyr77]

Um es Allgemein zu halten, weil meine Anfrage wirklich wirr ist:

Ich hätte gerne, dass das Programm den Dateipfad der INI-Datei selbst ermittelt. Und zwar liegt diese INI-Datei im Debug-Ordner des Hauptprogrammes, welches mein Programm anspricht. Es ist eben allerdings unterschiedlich wo dieser Debug-Ordner liegt, weil das Programm auch an anderen Rechnern laufen soll. Auch kommt es darauf an, welches Hauptprogramm gerade angesprochen werden soll (als Parameter angegeben).

 lIniFileName := '..\..\..\bla.ini'; <-- Dies Zuordnung soll Automatisch erfolgen, je nachdem welches Hauptprogramm gerade angesprochen wird. Der Name der Ini ist immer gleich!