X xianjun Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-22 #2 var<br> szFileName: array[0..MAX_PATH] of Char;<br>begin<br> FillChar(szFileName, SizeOf(szFileName), #0);<br> GetModuleFileName(hInstance, szFileName, MAX_PATH);<br> Result := szFileName;<br>end;
var<br> szFileName: array[0..MAX_PATH] of Char;<br>begin<br> FillChar(szFileName, SizeOf(szFileName), #0);<br> GetModuleFileName(hInstance, szFileName, MAX_PATH);<br> Result := szFileName;<br>end;