Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi Welches Bit in einer Zahl ist gesetzt

**BenjaminH**

Delphi-Quellcode:

			function IsBit(n,x:Integer):Boolean;//n ist die Zahl x das Bit

Begin

  Result:=(n mod (x*2))>=x;

end;

BenjaminH Registriert seit: 14. Okt 2004 Ort: Freiburg im Breisgau 713 Beiträge Turbo Delphi für Win32	#3 Re: Welches Bit in einer Zahl ist gesetzt 4. Okt 2005, 16:35 markieren Delphi-Quellcode: function IsBit(n,x:Integer):Boolean;//n ist die Zahl x das Bit Begin Result:=(n mod (x*2))>=x; end; Benjamin
	Zitat