property OnChunkChange: TPdfReadingChunkEvent;
Използвайте това събитие, за да обновявате UI състояние, показвания на напредък или външни метаданни за реч
procedure TForm1.ReadingSessionChunk(Sender: TObject; ChunkIndex: Integer);
begin
StatusBar1.SimpleText := IntToStr(ChunkIndex + 1);
end;