fpc/utils/instantfpc/examples/writeparameters.pas
2011-12-19 17:40:02 +00:00

9 lines
126 B
ObjectPascal

#!/usr/bin/env instantfpc
{$mode objfpc}{$H+}
var
i: Integer;
begin
for i:=0 to ParamCount do writeln(ParamStr(i));
end.