Source position: virtualtrees.pas line 1825
type TVTIncrementalSearchEvent = procedure(
Sender: TBaseVirtualTree;
Node: PVirtualNode;
const SearchText: string;
var Result: Integer
) of object;