Einzelnen Beitrag anzeigen

Benutzerbild von Nothine
Nothine

Registriert seit: 3. Jul 2004
Ort: Mülheim an der Ruhr
198 Beiträge
 
Delphi 5 Enterprise
 
#8

Re: Zahl gerade oder ungerade?

  Alt 14. Jan 2005, 13:29
Zitat von Stevie:
[senfmode]Die Funktion Odd ist CompilerMagic, deshalb wird sie wohl schneller sein, als alle selbst gebauten... [/senfmode]
[klugscheiß]
nich unbedingt, als funktion ist Odd nix anderes als
Delphi-Quellcode:
function Odd(X: Longint): Boolean;
asm
  AND EAX,$01 // AND AL,$01 würde sogar schon reichen
end;
und bei z.B. if Odd(Variable) then halt
Delphi-Quellcode:
...
  TEST {Register or Memory},$01
  J{bedingung} //oder SET{bedingung}, je nach verwendung
also ich glaub das kann man auch noch selber so schnell nachbauen wie der compiler
[/klugscheiß]
das musste jetz sein
if ThisPost is senseless then
ThisPost.WasPostedBy := SomeoneElse();
  Mit Zitat antworten Zitat