property OnChunkChange: TPdfReadingChunkEvent;
از این رویداد برای بهروزرسانی وضعیت UI، نمایشهای پیشرفت یا فرادادهٔ گفتار بیرونی استفاده کنید
procedure TForm1.ReadingSessionChunk(Sender: TObject; ChunkIndex: Integer);
begin
StatusBar1.SimpleText := IntToStr(ChunkIndex + 1);
end;