shl mit 8 Bit

[BergLoewe]

Hallo,


ich muß für eine Prüfsumme Bits in einem einzelnen Byte verschieben. Theoretisch mit shl weniger das Problem. Praktisch kommt es aber irgendwie zu einem Überlauffehler. Denn wenn das oberste Bit 7 eine 1 ist, bringt er mir einen Rangefehler. Da will er das Bit wahrscheinlich nicht in den Papierkorb fallen lassen und weiß nicht wohin.
Wie bring ich Delphi denn aber genau dazu, dass das oberste Bit beim Linksschieben verschwindet?