I am using Delphi XE and IE 4.0.0 I do not know if what I want to do is possible in Image En. I have a multipage tiff file. That I want to split in to individual page files. This is easy but I want to read an area of the tiff page and turn it to Text to set the new page file name in steed if want I am doing now. Below is the code I am using to separate the pages. Source := FldSource.Text; FileName := Source + '\*.Tif'; if FindFirst(FileName,faAnyFile,F) = 0 then begin if tags.ReadFile( Source + '\'+F.Name ) then begin for x := 0 to Tags.GetPagesCount - 1 do begin fName := F.Name; delete(fName,pos('.',fName),4); Dest := FldDestination.Text+'\'+fName+'-'+intToStr(x)+'.tif'; Tags.WriteFile(Dest,x); end; end; DeleteFile(Source+'\'+F.Name); FindClose(F); end; Thanks in advance Donald S. Bossen J&B Importers Inc.
Search
Imag to Text
Posted - Aug 11 2011 : 08:44:17
