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;



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

沒有留言:

張貼留言

Why I Choose Delphi! (CHT)

扣除使用 C++ Builder 的時間,我實際使用 Delphi 的時間點是 2012 年,它帶我看到了不一樣的世界,見識到世界各地的高手使用 Delphi 創造出他們引以為豪的產品,並且無私的分享他們的學習知識,使我的技術能力得以跟隨他們的能力提升。 最最讓我喜歡的...