property OnChunkChange: TPdfReadingChunkEvent;
Ta dogodek uporabite za posodobitev stanja uporabniškega vmesnika, prikazov napredka ali zunanjih metapodatkov govora
procedure TForm1.ReadingSessionChunk(Sender: TObject; ChunkIndex: Integer);
begin
StatusBar1.SimpleText := IntToStr(ChunkIndex + 1);
end;