发信人: redfox (Z掉了几乎所有的版...), 信区: BorlandDev
标  题: Delphi编程 -- 4.13 记载的程序路径
发信站: 哈工大紫丁香 (2000年09月01日16:09:10 星期五), 站内信件

怎样获得程序启动快捷键中记载的程序路径  
ShortCut that Started Application?
OK, your problem is not setting current directory but you want to take
"ANY" shortcut and resolve its properties. Am I correct now ? :))
Take a look at unit ShlObj and IShellLink. (API help file)

var SCut: IShellLink;

SCut.Resolve
GetWorkingDirectory - Retrieves the name of the working directory for 
a
shell link object
GetPath - Retrieves the path and filename of a shell link object.

I have not done this before, just giving you ideas


 

--
※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.118.227.107]