TTabChangingEvent = procedure (Sender: TObject; var AllowChange: Boolean)

Событие вызывается перед сменой страницы.

Параметры:

• Sender - источник события.
• AllowChange - True, если менять страницу разрешено.

Ссылки: TPageControl.OnChanging