Browse Source

* Do not raise an error when an attempt is made to delete a non-existing key

git-svn-id: trunk@12326 -
michael 16 years ago
parent
commit
977e033932
1 changed files with 0 additions and 1 deletions
  1. 0 1
      packages/fcl-base/src/contnrs.pp

+ 0 - 1
packages/fcl-base/src/contnrs.pp

@@ -2112,7 +2112,6 @@ begin
         exit;
         exit;
       end;
       end;
   end;
   end;
-  raise EKeyNotFound.CreateFmt(KeyNotFoundMsg, ['Delete', aKey]);
 end;
 end;
 
 
 function TFPCustomHashTable.IsEmpty: boolean;
 function TFPCustomHashTable.IsEmpty: boolean;