Update Hash.pas