Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Fehlerindex Datei-Verzeichnis (https://www.delphipraxis.net/14785-fehlerindex-datei-verzeichnis.html)

Fr34k 15. Jan 2004 15:07


Fehlerindex Datei-Verzeichnis
 
Hallo! :-D
Ich habe einen Fehlerindex in mein Programm eingebaut und diese Datei befindet sich jetzt noch im Hauptverzeichnis 'C:\' genau wie das Hauptprogramm (*.exe Datei).
Wenn ich jetzt die 2 Dateien in einen Test Ordner verschiebe, dann wird die Datei Fehlerindex nichtmehr geöffnet.
Wie bekomme ich es hin, dass die Datei Fehlerindex.htm immer im selben Ordner gefunden wird, in der auch das Hauptprogramm liegt. :gruebel:

Delphi-Quellcode:
procedure TForm1.Fehlerindex1Click(Sender: TObject);
var
datei : String;
begin
   datei := 'c:\Fehlerindex.htm';
   shellexecute(handle, 'open', PChar(datei), nil, nil, sw_show);
end;

mirage228 15. Jan 2004 15:09

Re: Fehlerindex Datei-Verzeichnis
 
Delphi-Quellcode:
  datei := ExtractFilePath(ParamStr(0))+'Fehlerindex.htm';
mfG
mirage228

Fr34k 15. Jan 2004 15:13

Re: Fehlerindex Datei-Verzeichnis
 
vielen Dank für die schnelle Hilfe! :zwinker:

MfG Fr34k :thuimb:


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:32 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz