Source position: kpagecontrol.pas line 275
type TKTabClickEvent = procedure(
Sender: TObject;
TabIndex: Integer
) of object;