#pas
FColorDialogEx.OnCanClose := onCanClose;