property OnChunkChange: TPdfReadingChunkEvent;
使用此事件更新 UI 状态、进度显示或外部语音元数据
procedure TForm1.ReadingSessionChunk(Sender: TObject; ChunkIndex: Integer);begin StatusBar1.SimpleText := IntToStr(ChunkIndex + 1);end;