Mein Code wird irgendwie rückwärts ausgegeben, ist das richtig?! :O
Du hast doch diesen Code geschrieben ... Das mußt du doch wissen?
Aber ja, du fügst die kleinesten Bits vorne in den Ergebnis-String ein, also ja, wenn du rückwärts schreibst, dann ist das Ergebnis auch rückwärts.
Und du solltest dir unbedingt angewöhnen deine Result-Variablen zu initialisieren.
Delphi-Quellcode:
function CharToBin(ordinary: integer): string;
var ergebnis : integer;
begin
Result := '';
while ordinary > 0 do
Result hat hier nur zufällig gleich beim Start einen Leerstring drin und das muß nicht immer so sein, also solltest du unbedingt dafür sorgen, daß es immer so ist.