Problems with TppArchiveReader

arnfinn · Post by **arnfinn** » Tue Sep 27, 2011 11:18 am

Hi!
When I try to read a *.Raf files the 4 last lins on page 1 are repeted on page 2. I have used this code:

procedure TForm1.cxButton1Click(Sender: TObject);
begin
  ppArchiveReader1.ArchiveFileName := 'C:\17896.raf';
  if FileExists(ppArchiveReader1.ArchiveFileName) then
  begin
    try
      ppArchiveReader1.Print;
    except
     on e:exception do
     begin
       showmessage('ops: ' + e.Message);
     end;
    end;
  end;
end;

My problem is that I do not know if the error is made when saving the file or opening it agien. Any sugestions?

Best regards Arnfinn

Post by **Sergey Tkachenko** » Tue Sep 27, 2011 3:57 pm

Please send me a project reproducing this problem.

arnfinn · Post by **arnfinn** » Wed Sep 28, 2011 6:05 am

You got m@il.

Arnfinn

arnfinn · Post by **arnfinn** » Thu Sep 29, 2011 9:57 am

Hi!
Have you received my m@il?

Arnfinn

Post by **Sergey Tkachenko** » Thu Sep 29, 2011 3:10 pm

I received the project.

A report is paginated before saving to an archive. An archive contains each page separately. So, if a pagination is wrong, it happens before (or on) saving to an archive.
So, to find this problem, I need a project that creates this archive file.