Translate

2011/05/18

[轉載]取得執行檔路徑的各種方式

轉自:取得執行檔路徑



procedure TForm1.Button2Click(Sender: TObject);
var  spath:string;
begin
  spath := ExtractFilePath(Application.ExeName);
  ShowMessage(spath);
  { -->  D:\\***\**\     最後有\ }



  GetDir(0,spath);
  ShowMessage(spath);
  { -->  D:\\***\**   最後沒有\ }


  showmessage(ParamStr(0));
  { -->  D:\\***\**\***.exe  取得執行檔完整路徑 }
end;



有沒有取得正妹路徑的方法呀?

沒有留言:

張貼留言

DataSnap REST API Authorization with PHP

About Authentication with DataSet REST JavaScript client. In connection.js: function setCredentials(user, password) { connectionInf...