00001 00002 // String-Cache 00003 TStr TStrCache::GetStr(const TStr& Str){ 00004 int StrId=-1; Rqs++; 00005 if (!StrH.IsKey(Str, StrId)){ 00006 StrId=StrH.AddKey(Str);} 00007 else {Hits++;} 00008 return StrH.GetKey(StrId); 00009 } 00010