Zitat:
Delphi-Quellcode:
For i := 0 To row - 1 do begin
R1 := LibTiffDelphi.TIFFReadScanline(OpenTiff2,Buf,i,0);
R2 := LibTiffDelphi.TIFFWriteScanline(OpenTiff,Buf,i,0);
//ShowMessage(IntToStr(R1) + ' ' + IntToStr(R2));
end;
welchen wert hat 'row' bei dir ?
für mich siehts so aus das die schleife nicht durchlaufen wird
cya