Ich habe es gerade auch mal durchgespielt, zur Sicherheit auch noch die System.Hash von Tokio ins Projekt
kopiert und zu test.Hash umbenannt .
Berlin und Tokio rufen unterschiedliche Funktionen auf.
Das ist gar nicht schön....
Code:
Berlin:
procedure THashSHA1.Update(const AData: PByte; ALength: Cardinal);
Tokio:
procedure THashSHA1.Update(const AData; ALength: Cardinal);
Wobei beide jetzt gegen test.Hash kompiliert haben.