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

轉自:取得執行檔路徑



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;



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

留言

這個網誌中的熱門文章

對於 Delphi 10.1 Berlin 推出的看法

Delphi ORM Generator