DEC: Selftest immer false

[Die Muhkuh]

Hi,

Delphi-Quellcode:

with THash_MD5.Create(nil) do
      begin
        if SelfTest then
          lbSelfTest.Caption := 'Message Digest 5: OK'
        else
          lbSelfTest.Caption := 'Message Digest 5: Fehler beim initalisieren';
      end;

mit dieser Procedure überpüfe ich den Seltest vom MD5. Aber es kommt immer Fehler beim initalisieren. Demnach ist der Selftest immer false. Das hab ich schon auf 3 PC probiert, auf allen das gleiche.

Warum ist der Selftest immer false? Mach ich was falsch?