Wolfgang Chien's Homepage | Delphi學習筆記 - 問答篇 |
請教delphi 如何抓 program arguments ?
ex: prog1 data1.dat data2.dat data3.dat prog1 is a .exe file by delphi and data1.dat is an data file how can i get "data1.dat" this file name in prog1 program like c languge have arg(1) function , in delphi can ifind same function ? thanks.
假設我的程式是 tttt.exe 要戴入一個檔案 aaaa, 要如何讓它可以 tttt aaaa +ENTER 這種方式自動戴入 aaaa 這個檔案?
我是用 delphi 寫的... 先謝了...
有關 Delphi 傳入應用程式的命令列參數, 請參考以下的說明:
![]() |
1. 取得命令列參數的個數: ParamCount 函數 |
![]() |
2. 呼叫 ParamStr(0), 傳回執行檔的檔名(含路徑) |
![]() |
3. 呼叫 ParamStr(n), 傳回第n個參數的內容 |
例:
1. 新開一個 project
2. 在 form 中安排一個
TMemo 元件
3. 在 form1 的 oncreate
事件中撰寫事件處理程式:
procedure TForm1.FormCreate(Sender: TObject); var sFileName: string; begin if ParamCount > 0 then begin (* 有執行參數傳入 *) sFileName := ParamStr(1); (* 取得參數內容 *) if FileExists(sFileName) then Memo1.Lines.LoadFromFile(sFileName) else Application.MessageBox('找不到指定的檔案', '訊息', 48); end; end;
另外, 您可以使用主選單 Run | Parameters 設定參數測試這支程式
詳細的說明, 您可以參考 Online help 中對於 ParamCount與 ParamStr 這兩個函數的說明
首頁 | 學習筆記 | 主題公園 | 軟體下載 | 關於本站 | 討論信群 | 相約下次 |