nochmal DEC: Hash wird nicht in Stream geschrieben ???

[Predator]

ahsoo ok noch ne Frage.

Jetz hab ich ne If Abfrage wo die berglichen werden:

Delphi-Quellcode:

if FileHeader.FileHashString <> EncodedHash then
  begin
      Label6.Font.Color := clRed;
      Label7.Font.Color := clRed;

      Label9.Font.Color := clRed;
      Label9.Caption := 'unwahrscheinlich';
      Label6.Font.Color := clRed;
      Label7.Font.Color := clRed;
  end
else
  Label6.Font.Color := clGreen;
  Label7.Font.Color := clGreen;

  Label9.Font.Color := clGreen;
  Label9.Caption := 'wahrscheinlich';
  Label6.Font.Color := clGreen;
  Label7.Font.Color := clGreen;
end;

doch da ist immer ein Label Grün und es kommt immer wahrscheinlich raus. Wo liegt denn da wieder der Fehler ?