Тип события, возникающего в конце записи изображения
TAfterSaveImageEvent = procedure(Sender: TObject; lCode: integer;
oIndex: integer; oMUID: int64; aImageName, aImageFileName: string) of object;
Sender
aImageName
aImageFileName