Einzelnen Beitrag anzeigen

Amateurprofi

Registriert seit: 17. Nov 2005
Ort: Hamburg
1.041 Beiträge
 
Delphi XE2 Professional
 
#1

Zahlen in binärer Form eingeben

  Alt 9. Aug 2010, 16:36
Nur mal am Rande bemerkt:

Gelegentlich tauchte die Frage auf, ob man, analog zu Hexzahlen, auch Binärzahlen direkt eingeben kann.

Delphi versteht ja eigentlich nur dezimale Zahlen und mit vorgestelltem '$' auch Hex-Zahlen.

Mit einem kleinen Umweg, kann man aber auch binäre- und oktale Konstanten verwenden, denn der integrierte Assembler versteht diese.

Beispiel :

Delphi-Quellcode:
PROCEDURE Bla;
var b,h,d,o,q:integer;
begin
   asm mov b, 10b end; // Binäre Zahl 10 (dezimal 2) in b stellen
   asm mov h, 10h end; // Hex Zahl 10 (dezimal 16) in h stellen
   asm mov d, 10d end; // Dezimale Zahl in d stellen
   asm mov o, 10o end; // Oktale Zahl (dezimal 8) in o stellen
   asm mov q, 10q end; // Oktale Zahl (dezimal 8) in q stellen
end;
Gruß, Klaus
Die Titanic wurde von Profis gebaut,
die Arche Noah von einem Amateur.
... Und dieser Beitrag vom Amateurprofi....
  Mit Zitat antworten Zitat