Dezimalzahlen ins Binärsystem

[NewDelphiBenutzer]

Hey Leute ich wollte ein Programm machen als freiwillige Zusatzhausaufgabe. Und da soll am Ende folgendermaßen aussehen: Man soll in ein Editfeld eine Zahl eingeben. Und diese Zahl soll dann ins Binärsystem umgewandelt werden.

Und zwar sind unter dem Editfeld 8 Checkboxen.
Das Programm soll entsprechend der Zahl Kreuze in die Boxen setzen.
Beispiel: Benutzer gibt 200 ins Editfeld ein.
Die Boxen sind von links nach rechts immer weniger wert.
128,64,32,16,8,4,2,1
x x / / x

Weil von 200 werden erst 128 angekreuzt, dann bleiben ja noch 72 übrig. Dann muss das Programm gucken in 72 passt 64 auch noch rein. Danach bleibt ja noch 8 übrig, dann guckt das Programm okay 32 und 16 gehen nicht, da soll kein Kreuz hin. Aber 8 sind übrig perfekt. Da kommt dann noch ein kreuz hin. Und die Anordnung kommt halt immer auf die Zahl an. Und das sollen wir irgendwie mit mod und dif machen aber ich weiß nicht genau wie meine diese Funktion anwendet. DAs ist ja immer etwas mit Rest. Ich habe auf jeden Fall eine Variable namens Dezimalzahl. Und ich wollte fragen wie ich das anfangen soll, damit das Programm funktioniert. Ich bräuchte eine kleine Starthilfe.
Würde mich sehr freuen !
Liebe Grüße Alex