Source:=FData.cFileName; if Copy(Source, 1, 4) = 'text' then // < тут ошибка CopyFile(PChar(Path+FData.cFileName), FData.cFileName, True);
[dcc32 Error] Project1.dpr(38): E2034 Too many actual parameters