Hallo Mario,
du könntest, nachdem du InputFiles gesetzt hast, in einer Schleife über die dadurch generierten OutputFiles gehen und die PfadKomponente ersetzen:
Delphi-Quellcode:
procedure ChangeOutputFiles(s: TStrings; const filePath: TFileName);
var
i: Integer;
fp: TFileName;
begin
fp := IncludeTrailingPathDelimiter(filePath);
for i := 0 to Pred(s.Count) do
s[i] := fp + ExtractFileName(s[i]);
end;
Freundliche Grüße