@Luckie
das geht wohl nicht ... wenn ich die Deklaration davon suchen laß, dann lande ich in der System.pasund da ist natürlich nicht's zufinden -.-
Aber es wird wohl so aussehn ^^
Delphi-Quellcode:
function Odd(X: Longint): Boolean;
begin
Result := Boolean(X and $01);
end;
[ADD]
@negaH
meines ist schneller
(der Vergleich mit 1 ist entfallen)
[EDIT]
sch*** Schreibfehler