Zitat von
Flocke:
Delphi-Quellcode:
function Sign(Value: Integer): Integer; inline;
begin
Result := (Value shr 31) or 1;
end;
Nenn mich blöd, aber warum noch das
or?
edit:
Ja, ich hab mir das
shr als
sar vorgestellt beim lesen, aber warum das
or muss, ist mir erst später aufgefallen... Nennt mich nicht blöd, bindet mir ein Schild um