Question

delphi 怎样得到系统的搜索路径或系统路径，和程序运行的路径？？？

Answer 1

var
tmpdir:string;constmax_path=array
of
char;系统路径：
getsystemdirectory(tmpdir,MAX_PATH);
//取得windows目录
c:\windows
GetWindowsDirectory(tmpdir,MAX_PATH);
//取得应用程序所在的路径
Vfilepath:=application.ExeName;