我在我的專案中使用JCL Delphi 庫。下面是我的代碼。
// uses JclSysUtils;
var cmd := TJclCommandLineTool.Create(parts[0]);
if cmd.Execute(params) then
begin
...
end;
如您所見，我使用TJclCommandLineTool呼叫外部命令列程式。問題是外部程式總是在我啟動應用程式的當前目錄中運行。我想知道如何將自定義作業目錄傳遞給外部程式。JCL 的檔案很蹩腳，我找不到相關資訊。
uj5u.com熱心網友回復：
TJclCommandLineTool 沒有這樣的選項。最簡單的方法是：
//uses System.IOUtil;
var oldDir := TDirectory.GetCurrentDirectory;
try
TDirectory.SetCurrentDirectory(ANewProgramDir);
var cmd := TJclCommandLineTool.Create(parts[0]);
if cmd.Execute(params) then
begin
// ...
end;
finally
TDirectory.SetCurrentDirectory(oldDir);
end;
轉載請註明出處，本文鏈接：https://www.uj5u.com/ruanti/433793.html
標籤：德尔福