2 Möglichkeiten:
Delphi-Quellcode:
if dezimalzahl div 128 = 1 then
checkbox128.checked := true
else
checkbox128.checked := false;
Oder eleganter:
checkbox128.checked := dezimalzahl div 128 = 1; Man bedenke, dass nachfolgende Mod nicht zu vergessen, sonst kommt bei 64, 32, 16, 8, 4, 2 und 1 nur Crap raus.
