Hallo zusammen,
ich weiß wahrscheinlich stehts in der
OH, aber ich bin zu blöd es zu finden:
Delphi-Quellcode:
begin
h := 0;
{$Q-}
for i := 1 to Length(k) do
h := h*129 + ord(k[i]) + $9e370001; {---- hier knallt es!}
{$Q+}
Result := h;
end;
das ist aus Superobject.pas, wofür $Q gut ist ist auch klar, aber es wird nicht beachtet.
Wie kriege ich es hin, daß diese Compilerdirektiven auch wirklich beachtet werden?
Gruß
K-H