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