TcxImageAssignPictureEvent = procedure(Sender: TObject; const Picture: TPicture) of object;