Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi Rotate in Delphi-Language?

**OlafSt**

Mit einer winzigen Veränderung gehts auch in 64-Bit:

Delphi-Quellcode:

			function ROL(Value: Cardinal; Count: Byte): Cardinal; assembler;  //Beachte die Direktive

asm

   ROL EAX, DL

end;

Cardinals, weil das ganze als unsigned-Rotate arbeitet.

OlafSt Registriert seit: 2. Mär 2007 Ort: Hamburg 284 Beiträge Delphi 10.2 Tokyo Professional	#4 AW: Rotate in Delphi-Language? 26. Okt 2014, 20:57 Mit einer winzigen Veränderung gehts auch in 64-Bit: markieren Delphi-Quellcode: function ROL(Value: Cardinal; Count: Byte): Cardinal; assembler; //Beachte die Direktive asm ROL EAX, DL end; Cardinals, weil das ganze als unsigned-Rotate arbeitet.
	Zitat