ImageEn, unit iexClasses

TIETIFFHandler.CopyTag

TIETIFFHandler.CopyTag


Declaration

procedure CopyTag(srcPageIndex: integer; srcTagIndex: integer; source: TIETIFFHandler; dstPageIndex: integer);


Description

Copies a tag from another TIETIFFHandler object (i.e. another TIFF).
Parameter Description
srcPageIndex Source page index (0=first page)
srcTagIndex Source tag index (use FindTag to get an index from tag code)
source Source TIETIFFHandler object, that is the source TIFF file
dstPageIndex Destination page index (0=first page)

Note: Use FindTag to obtain the srcTagIndex.


Example

// copy tiff tag 271 (Manufacturer) from file1.tif to file2.tif
var
  file1: TIETIFFHandler;
  file2: TIETIFFHandler;
begin
  file1 := TIETIFFHandler.Create('file1.tif');
  file2 := TIETIFFHandler.Create('file2.tif');

  file2.CopyTag(0, file1.FindTag(0, 271), file1, 0);

  file2.WriteFile('file2.tif');

  file2.Free;
  file1.Free;
end;