Lazarus_Hashing
                                
                                 Lazarus_Hashing copied to clipboard
                                
                                    Lazarus_Hashing copied to clipboard
                            
                            
                            
                        add helper method IsIndexValid
adding helper func will help in places like this:
function THasherList.GetName(Index: Integer): String;
begin
  if (Index > FList.Count-1) or (Index < 0) then Result := ''
This is a very simple IF. Replacing it with a method will make the slower.
then add inline.