Source position: msefiledialog.pas line 430
type dirtreepatheventty = procedure(
const sender: tobject;
const avalue: msestring
) of object;