获取程序执行的命令行参数

在主窗体的OnCreate事件中,可以获取程序执行时的命令行参数:

ParamCount:传入的参数个数

ParamStr(0):执行程序的文件名(全路径,等同Application.ExeName)

ParamStr(n):执行程序时传入的第n个参数,从下标1开始,到ParamCount结束

例如:

程序命令行:"D:\Test\Project1.exe" -abc -123

procedure TForm1.FormCreate(Sender: TObject);
var
  i: Integer;
begin
  ShowMessage(ParamCount.ToString);  //2
  ShowMessage(ParamStr(0));  //D:\Test\Project1.exe

  //直接取参数
  if ParamCount = 2 then
  begin
    ShowMessage(ParamStr(1));  //-abc
    ShowMessage(ParamStr(2));  //-123
  end;

  //遍历参数
  if ParamCount > 0 then
  for i := 1 to ParamCount do
    ShowMessage(ParamStr(i));  //分别显示 -abc -123
end;

你可能感兴趣的:(Delphi,命令行参数)