berikut ini adalah tutorial bagaimana caranya membaca seluruh Tag dari file Tiff. script ini disusun untuk berdasarkan https://partners.adobe.com/public/developer/en/tiff/TIFF6.pdf yang menjelaskan struktur format file TIFF.
script ini disusun menggunakan Lazarus/Free Pascal Compiler (FPC) dan dapat pula di-compile menggunakan Delphi 7
berikut penjelasan singkat bagaimana membaca seluruh Tag pada file TIFF
//===================================================
var tiff:TTiffDI;
tag:TIFDTagR;
i:integer;
begin
if opendialog1.execute then begin
tiff:=TTiffDI.create();
try
tiff.LoadFromFile(opendialog1.Filename);
for i:=0 to tiff.Count-1 do begin
tag:=tiff[i];
....
....
end;
finally
tiff.destroy;
end;
end;
end;