我想编一个小程序,但这个程序需要实现获取几个参数,在根据实际参数进行。我不知道DELPHI如何实现带参数运行,请教!在线等待!

解决方案 »

  1.   

    paramcount得到命令行参数的个数,然后通过paramstr(n)访问每一个!
      

  2.   

    Delphi提供了访问命令行参数的方便的方式,那就是使用ParamStr和ParamCount函数。其中ParamStr(0)返回的是当前程序名,如C:\TEST\MYPROG.EXE,ParamStr(1)返回第一个参数,以此类推;ParamCount则是参数个数。示例如下: 
    var 
      i:integer;
    begin
      if ParamCount>0 then
      for i:=1 to ParamCount do
          showmessage(paramStr(i));
    end;