程序开始只创建了DataMoudle，在DataMoudle中如何获取本应用程序路径？
在DataMoudle中application不能识别。

[解决办法]
var
FileName: String;
iLen: LongWord;
begin
iLen := MAX_PATH;
SetLength(FileName,iLen);
iLen := GetModuleFileName(0,PChar(FileName),iLen);
SetLength(FileName,iLen);
ShowMessage(FileName);
end;
[解决办法]
uses Forms;
ShowMessage(ExtractFilePath(Application.ExeName));
[解决办法]
1.GetModuleFileName
2.Uses Forms
Application.ExeName