Command 実行時引数
Delphiで実行時引数(実行時に渡されてた引数)は ParamStr を使用します。
渡された引数の数を調べるには ParamCount を使用します。
ParamStrには何番目の引数を見るか、インデックスで指定します。 インデックス0(ゼロ)には実行中のアプリのパスと名前が入っているので最初の引数を得たいなら1を指定します。
| ■ ParamStrの例 |
procedure TForm1.Button1Click(Sender: TObject);
var
ix : integer;
begin
ShowMessage(ParamStr(0)); //実行パス
if ParamCount > 0 then begin
for ix := 1 to ParamCount do begin
Memo1.Lines.Add(ParamStr(ix));
end;
end;
end;
|