Kleine Präzisierung: es wird oft vergessen dass selbstverständlich auch mehrere Dateien als Parameter übergeben werden können (zb mit Drag and Drop auf das Programmicon). Eine Überprüfung einzig auf paramstr(1) ist deshalb oft zu ungenau.
Als Gedankenanstoss (ungetestet):
Delphi-Quellcode:
var
i: integer;
begin
if ParamCount > 0 then
begin
for i:= 1 to ParamCount do
ShowMessage(ParamStr(i));
end;
end;