Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi [Erledigt] %windir% wie geht des (https://www.delphipraxis.net/50532-%5Berledigt%5D-windir-wie-geht-des.html)

ichbins 27. Jul 2005 11:49

Re: %windir% wie geht des
 
Schreibe einfach anstatt der Konstante eine Funktion:

Delphi-Quellcode:
function filename:string;
begin
  result:=IncludeTrailingPathDelimiter(GetEnvironmentVariable('windir'))+'TEMP\~TEMP.MID';
end;
Die kopierst du irgendwo ganz oben in den Quellcode (gleich nach implementation). Dann kannst du Filename immer aufrufen, als ob es eine Konstante wäre.

tommie-lie 27. Jul 2005 11:52

Re: [Erledigt] %windir% wie geht des
 
Klasse Jungs, daß der Anwender sein Temp-Verzeichnis verlegt haben könnte habt ihr ja schon gemerkt, aber wenn von einem anderen Programm die Datei ~temp.mid im Temp-Verzeichnis schonmal erzeugt wurde, wird sie hoffnungslos überschrieben. Schön, wenn das dann fehlschlögt, weil besagte andere Anwendung die datei noch geöffnet hat. Für temporäre Dateien sollte man daher immer GetTempFilename() verwenden.

Thanatos81 27. Jul 2005 12:02

Re: [Erledigt] %windir% wie geht des
 
Ist natürlich ein schlagkräftiges Argument, da hab zumindest ich bei diesem Dateinamen nicht dran gedacht :oops:

Zitat:

Zitat von tommie-lie
Klasse Jungs, daß der Anwender sein Temp-Verzeichnis verlegt haben könnte habt ihr ja schon gemerkt,[..]

Fällt das unter DAU, wenn der Anwender den Pfad ändert, und den dann nicht wiederfindet :gruebel: :wink:

klaus.meyer 27. Jul 2005 12:05

Re: [Erledigt] %windir% wie geht des
 
Ich hab jetzt einen namen für die datei, der den namen meines programms beinhaltet.
Also wird kein anderes Programm die gleiche datei dort speichern und verwednen

Also nochmals: Vielen Dank für euere Hilfe :kiss:


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:14 Uhr.
Seite 2 von 2     12   

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