Nun ja, es ist lesen, verstehen, tippen. Faszinierendes kann ich da nicht erkennen.
Wenn man sich noch fragt, wie denn ein Kollege hier mit gleichen Werten einen anderen Wert bekommen hat, der ändert einfach mal eine Zeile ab
Delphi-Quellcode:
// e := TShannonEntropy.Calculate<Char> ( str.ToCharArray() );
e := TShannonEntropy.Calculate<Byte> ( TEncoding.UTF8.GetBytes(str) );
und erhält wie durch ein Wunder