diff --git a/wst/trunk/type_lib_edtr/edit_helper.pas b/wst/trunk/type_lib_edtr/edit_helper.pas index 0af12e604..515977ecf 100644 --- a/wst/trunk/type_lib_edtr/edit_helper.pas +++ b/wst/trunk/type_lib_edtr/edit_helper.pas @@ -886,7 +886,7 @@ var begin if (AObject = nil) then exit; - if (AObject.RefCount > 1) then + if (AObject.RefCount > 0) then raise EWstEditException.CreateFmt(s_CantDeleteStillReferencedObject,[AObject.Name]); sct := ASymbolTable.CurrentModule.InterfaceSection; sct.Declarations.Extract(AObject);