Source position: projectfileintf.pas line 31
type TSaveEvent = procedure(
Sender: TObject
) of object;