Source position: bgraimagemanipulation.pas line 310
type TCropAreaEvent = procedure(
Sender: TBGRAImageManipulation;
CropArea: TCropArea
) of object;