Du brauchst das Komma garnicht. Ruf einfach so auf:
Delphi-Quellcode:
//Nicht so:
DateienLoeschen(path+'\','*.jpeg');
//Sondern so:
DateienLoeschen(path+'\*.jpeg');
Eine Funktion die 2 Parameter erfordert, so wie du sie verwendest, sieht so aus:
Delphi-Quellcode:
function dateienloeschen(filepath,fileext:string):integer;
var
f:tsearchrec;
fi:file;
files:array of string;
i:integer;
filename:string;
begin
result:=0;
filename:=filepath+fileexit;
if findfirst(filename,0,f)<>0 then exit;
setlength(files,1);
files[0]:=f.Name;
while findnext(f)<>0 do begin
setlength(files,length(files)+1);
files[length(files)-1]:=f.Name;
end;
findclose(f);
for I:=0 to length(files)-1 do
begin
try begin
assignfile(fi,files[i]);
erase(fi);
inc(result);
end; except end;
end;
end;