TempDirectory Ermitteln!

al90 · Beitrag von **al90** » 29.08.2005 22:50


; Ermittelt das Temporäre Verzeichnis von Windows

Procedure.s GetTempDir()
a$=Space(#MAX_PATH)
x=GetTempPath_(Len(a$),@a$)
b$=PeekS(@a$)
If Right(b$,1)<>"\":b$+"\":EndIf
ProcedureReturn b$
EndProcedure

temp$=GetTempDir()
Debug temp$

Hoto · Beitrag von **Hoto** » 08.02.2008 05:52

Ist inzwischen überflüssig, dafür gibts jetzt den PB eigenen Befehl:

GetTemporaryDirectory()

Leider weiß ich nicht ab welcher PB Version der integriert wurde.

Bin auf den Code Schnipsel gestoßen, nachdem ich den neuen Befehl übersehen und deswegen hier im Forum gesucht hatte.

AND51 · Beitrag von **AND51** » 08.02.2008 14:13

@ al90:
Warum so umständlich??

Code: Alles auswählen

Procedure.s GetTempDirectory()
	Protected path.s=Space(#MAX_PATH)
	GetTempPath_(#MAX_PATH, @path)
	PathAddBackslash_(@path)
	ProcedureReturn path
EndProcedure

Debug GetTempDirectory()

Beitrag von **bobobo** » 08.02.2008 15:12

STARGÅTE · Beitrag von **STARGÅTE** » 08.02.2008 15:57

der gefällt mich am bessten ^^

AND51 · Beitrag von **AND51** » 08.02.2008 15:59

Hoto · Beitrag von **Hoto** » 09.02.2008 07:12

Ähm, ich wollte lediglich darauf hinweisen, dass es dafür inzwischen einen PB internen Befehl gibt und nicht damit eine Diskussion starten, wie man einen inzwischen überflüssigen Code Schnipsel von vor 2 1/2 Jahren noch verbessern kann.