delphi与autocad(50分)

executefile()函数中的参数及意义。请举一个关于在delphi中调用autocad中*.dwg文件的完整例子。

Check out FMXUTIL.PAS in Delphi examples:
--------------------------------------------------------------------------------
function ExecuteFile(const FileName, Params, DefaultDir: string;
ShowCmd: Integer): THandle;
var
zFileName, zParams, zDir: array[0..79] of Char;
begin
Result := ShellExecute(Application.MainForm.Handle, nil,
StrPCopy(zFileName, FileName), StrPCopy(zParams, Params),
StrPCopy(zDir, DefaultDir), ShowCmd);
end;
--------------------------------------------------------------------------------
Called with the code :
executeFile('maker.exe','text_file','c:/maker', SW_SHOWNORMAL);
You can try
executeFile('acad.exe','aaa.dwg','c:/prog...', SW_SHOWNORMAL);
???????? ??????? Path of ACAD

http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=246288

多人接受答案了。