Die Datei wird dem Programm als Parameter übergeben. Den kannst du mit ParamStr auslesen und die Datei dann anspielen. z. B. so:
Delphi-Quellcode:
var
filename: String;
begin
if ParamCount > 1 then
begin
filename := ParamStr(1);
Abspielen(filename);
end;
end;