Keskustelu: Koodit: Pascal: Parametrit

Tulostaa näyttöön kaikki annetut parametrit...
ParamCount = palauttaa parametrien määrän
ParamStr(luku) = palauttaa parametrin, joka on kohdassa luku
ParamStr(0) = palauttaa ohjelman polun

var
  i : Integer;

begin
  for i := 0 to ParamCount do
    ShowMessage('Parameter '+IntToStr(i)+' = '+ParamStr(i));
end;