[ViNT]

В общем, должно быть примерно так:

program jsr75tst;
uses jsr75;
var
 i,byte:Integer;
 s:string;
begin
 s:=jsr75.read_file('/c:/other/file'+integertostring(i)+'.png');
 
 for i:=0 to Length(S)-1 do
 begin
  byte:=ord(GetChar(S,i));
  //обработка
  S:=SetChar(S,CHR(Byte),i);
 end;
 
 jsr75.write_file('/c:/other/file.png',s);
 
end.