Ich wusste, dass diese Antwort kommt.
Relativ gesehen nicht. Also er hat sich ja dabei gedacht, dass das einzelne Bits präsentiert.
Nochmal zum Problem:
Code:
Bit 1 = 00000001 = 1 (Dezimal) = $01 (Hexadezimal)
Bit 2 = 00000010 = 2 (Dezimal) = $02 (Hexadezimal)
Bit 3 = 00000100 = 4 (Dezimal) = $04 (Hexadezimal)
Bit 4 = 00001000 = 8 (Dezimal) = $08 (Hexadezimal)
Bit 5 = 00010000 = 16 (Dezimal) = $10 (Hexadezimal)
Bit 6 = 00100000 = 32 (Dezimal) = $20 (Hexadezimal)
Bit 7 = 01000000 = 64 (Dezimal) = $40 (Hexadezimal)
Bit 8 = 10000000 = 128 (Dezimal) = $80 (Hexadezimal)
Diese Folge kann man auch als eine 2er Potenz anschreiben:
2^0, 2^1, 2^2, 2^3, 2^4, 2^5, 2^6, 2^7, ...
Edit: Ach übrigens, warum verwendest du nicht einfach mein kleines Record um die Einzelnen Bits zu setzen?
Delphi-Quellcode:
// Ersetze folgendes
type
TBuchstabe = record
Zeichen : char;
Attribut : byte;
end;
// mit das hier:
type
TBuchstabe = record
Zeichen : char;
Attribut : TBitByte;
end;