Source position: msefiledialog.pas line 523
procedure tfiledialogfo.pastefromclip(
const sender: TObject;
var avalue: msestring
);