delphi里怎么写consel程序请给个例.

Question

delphi里怎么写consel程序请给个例.
如果可以怎样能获得用户的输入参数比如运行consel.exe parm1 parm2后我的程序里要能提取到parm1,parm2.谢谢

Answer 1

New..Console Application就可以了。
在
begin
end;
之间加入你的代码用参数就和其它一样：
下边是一个例子。program Project1;
{$APPTYPE CONSOLE}
uses SysUtils;Var
  i: integer;begin
  // Insert user code here
  for i:=0 to ParamCount() do
    Writeln(ParamStr(i));
  Readln;
end.