Source position: vte_dbtreeex.pas line 110
type TVTDBOpenQueryEvent = procedure(
Sender: TBaseVirtualDBTreeEx;
var Allow: Boolean
) of object;