摘要:
functionTStrIntfHashMap.Remove(constKey:string):IInterface;varBucket:PStrIntfBucket;I:Integer;{$IFDEFTHREADSAFE}CS:IInterface;{$ENDIF}begin{$IFDEFTHREADSAFE}CS:=EnterCriticalSection;{$ENDIF}Result:=nil;ifKey=''thenExit;Bucket:=@(FBuckets[FHashFunction(HashString(Key))]);forI:=0toBucket.Count 阅读全文