首页 > 学院 > 开发设计 > 正文

应用程序中当前路径的两中写法、COM中当前路径取得

2019-11-18 18:14:53
字体:
来源:转载
供稿:网友
///////////// 应用程序当前路径  /////////////
ExtractFilePath(paramstr(0))
ExtractFilePath(application.ExeName)


///////////// COM中当前路径  /////////////
.... ....
   TCustomMG = class(TTypedComObject, ICustomMG)

function TCustomMG.getxmlPath: string;
var
   xmlPath:string;
   S:array[0..255] of char;
begin
  Result:='';
  GetModuleFileName(hinstance,s,length(s));
  xmlPath :=  extractfilepath(s);
  result := xmlPath;
end;

上一篇:选择一个网路邻居

下一篇:直接修改TWebBrowser显示内容

发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表
学习交流
热门图片

新闻热点

疑难解答

图片精选

网友关注