Source position: virtualtrees.pas line 1764
type TVTBeforeAutoFitColumnEvent = procedure(
Sender: TVTHeader;
Column: TColumnIndex;
var SmartAutoFitType: TSmartAutoFitType;
var Allowed: Boolean
) of object;