A ver, cambia el cuerpo de
Notification de esta forma:
Código Delphi
[-]
procedure TCCDShadow.Notification(AComponent: TComponent; Operation: TOperation);
begin
inherited Notification(AComponent,Operation);
if not (csLoading in ParentForm.ComponentState) or not (csDestroying in ParentForm.ComponentState) then
ShadowDraw;
end;
Lo que haces ahí es que si la forma se está cargando o destruyendo, no se deben dibujar las sombras...
Saludos...