path: root/packages/fcl-process/examples/echoparams.pp

program echoparams;

var
  I : Integer;
  
begin
  For I:=0 to ParamCount do
    Writeln(I:2,' : "',Paramstr(i),'"');
end.