在DELPHI中如何得到系统目录？系统的临时目录呢？？(50分)

H

hanhan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-11

• #1

[][8D][][!]

 

C

commons_sheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-11

• #2

用UINT GetSystemDirectory(LPTSTR lpBuffer,UNIT uSize)得到系统目录；<br>

 

F

Fucool

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-11

• #3

请问如何取得应用程序所在的目录<br>象VB的app.path 一样。<br>谢谢<br>

 

卷

卷起千堆雪tyn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-11

• #4

&gt;系统的临时目录：<br><br>function GetTempDirectory: String;<br>var<br>&nbsp; TempDir: array[0..255] of Char;<br>begin<br>&nbsp; GetTempPath(255, @TempDir);<br>&nbsp; Result := StrPas(TempDir);<br>end;<br><br>&gt;应用程序所在的目录：<br><br>DWORD GetCurrentDirectory(<br><br>&nbsp; &nbsp; DWORD nBufferLength, // size, in characters, of directory buffer <br>&nbsp; &nbsp; LPTSTR lpBuffer // address of buffer for current directory <br>&nbsp; &nbsp;<br>

 

C

commons_sheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-11

• #5

DWORD GetTempPath(DWORD nBufferLength, LPTSTR lpBuffer); <br>

 

W

wuqiu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-11

• #6

UINT GetSystemDirectory(LPTSTR lpBuffer,UNIT uSize);得到系列路径<br>DWORD GetTempPath(DWORD nBufferLength, LPTSTR lpBuffer);得到临时目录路径<br>ExtractFilePath(Application.ExeName);得到应用程序所在路径<br>其实像这些特殊文件夹在注册表中都有，只要花点功夫写段读取注册表的程序，可得到大部份<br>特殊文件夹所在的目录，当然以上三个直接用函数调用就行了。

 

L

lslzf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-11

• #7

三个相关的API<br>getsystemdirectory<br>gettemppath<br>extractfilepath

 

H

hanhan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-11

• #8

哈哈！大家都对，其实只要一个人说就行了，谢谢了！

 

H

hanhan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-11

• #9

对不起大家，我本是给每个人10分的。但是忘记点分配分的单选钮了，结果都给第一个人了。<br>好在分不多，大家本意只是为了帮助我。[][][][!][^][?]