Source position: cyBaseTabControl.pas line 59
type TProcAdvancedDrawTab = procedure(
Sender: TObject;
const Tab: Integer;
const aRect: TRect;
var Draw: Boolean
) of object;