我如何取得我的程序的绝对路径(100分)

G

gxlnew

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-05

• #1

我如何取得我的程序的绝对路径？谢谢！

 

I

iie

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-05

• #2

;MyPath := ExtractFilePath(Application.EXEName);

 

H

honestman

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-05

• #3

来迟一步。

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-05

• #4

MyPath := ExtractFileDir(Application.EXEName); 也可以

 

L

Leaze

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-05

• #5

在程序中可用 Mypath:=GetCurrentDir;

 

Y

yufandi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-05

• #6

MyPath := ExtractFileDir(Application.EXEName);
MyPath := ExtractFilePath(Application.EXEName);
以程序为c:/Windows/system/123.exe为例ExtractFileDir(applicaition.exename)将返回
"C:/windows/system";extractFilePath将返回"c:/windows/system/"
多一个"/"

 

Y

ynfly

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-05

• #7

可惜我来迟了,哎几十分啊

 

F

fifa2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-05

• #8

ExtractFilePath(Paramstr(0))
这个够简单吧
加分吧

 

G

gxlnew

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-06

• #9

谢谢各位！谢谢！
另,
GetCurrentDir也许不妥,若SaveDialog等,也许就变了

 

G

gxlnew

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-06

• #10

多人接受答案了。