Seite 1 von 1

TempDirectory Ermitteln!

Verfasst: 29.08.2005 22:50
von al90

Code: Alles auswählen


; 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$

Verfasst: 08.02.2008 05:52
von Hoto
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.

Verfasst: 08.02.2008 14:13
von AND51
@ 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()
:allright:

Verfasst: 08.02.2008 15:12
von bobobo
BildBildBildBild

Verfasst: 08.02.2008 15:57
von STARGÅTE
Bild
der gefällt mich am bessten ^^

Verfasst: 08.02.2008 15:59
von AND51
:iamwithstupid:

Verfasst: 09.02.2008 07:12
von Hoto
Ä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. ;)