VC => dephi problem: 关于类似GetModuleFileName()函数怎么调用

Question

这类函数就是需要把地址传进去的。
在C里：　　TCHAR szPath[MAX_PATH];
    GetModuleFileName(hInst,szPath,MAX_PATH);
    TRACE(szPath);在dephi里：
　
　　GetModuleFileName(Application.handle, ??,?? );
    后两个参数怎么写
  

Answer 1

var
   intSize: Integer;
   arrPath: array[0..MAX_PATH] of Char;
   strValue: String;
begin
   intSize := GetModuleFileName(0, arrPath, MAX_PATH);
   arrPath[intSize] := #0;
   strValue := arrPath;
   // ??? ... ...
end;