Dezimalzahl in Binärzahl - Frage zum Quelltext

[haui95]

Vielen Dank für eure Antworten !
Die Funktionen DecToBin und Reverse habe ich allerdings selber geschrieben, um den Quelltext ein bisschen besser zu strukturieren und um eine dauerhafte Verwendung der Button Prozedur zu vermeiden. Desweiteren hatte mein Informatiklehrer nur die Button Prozedur verwendet und seinen Quelltext mit Zählschleife in diese hineingeschrieben.
Manchmal denke ich wirklich, dass einige Lehrer nicht in der Lage sind den Schülern etwas Vernünftiges beizubringen, zumal mein Lehrer seinen Quelltext für uns noch nicht einmal gemäß der Delphi Syntax der Übersichtlichkeit halber formatiert.

MfG

Hauke