Source position: opendialog.pas line 12
type TOnFileSelected = procedure(
Sender: TObject;
path: string;
fileName: string
) of object;