Source position: mufasatypes.pas line 136
type TOpenFileEvent = procedure(
Sender: TObject;
var Filename: String;
var Continue: Boolean
) of object;