1,183
社区成员
发帖
与我相关
我的任务
分享
//看来这不是楼主想要的:直接运行cd.exe
ShellExecute(0, PChar('Open'), PChar('I:\AA\cd.EXE'), nil, nil, SW_Normal);
HINSTANCE ShellExecute( HWND hwnd,
LPCTSTR lpOperation,
LPCTSTR lpFile,
LPCTSTR lpParameters,
LPCTSTR lpDirectory, // 直接添目录
INT nShowCmd
);
ShellExecute(0, 'Open', 'cd.EXE', nil, 'I:\AA\', SW_Normal);
SetCurrentDirectoryA(PChar('I:\AA\'));
ShellExecute(0, PChar('Open'), PChar('I:\AA\cd.EXE'), nil, nil, SW_Normal);