Source position: framview.pas line 201
protected procedure TFVBase.SetOnProgress(
const Handler: ThtProgressEvent
); override;