Hi,
dann sollte deine Routine, die nach binär konvertiert einfach soviel nullen davor setzen bis es wieder acht Zeichen sind. Ist das so schwer.
Es gab mal eine Funktion PadLW (string, padchar, len), die einen String mit dem PadChar verlängert bis er die Länge len hat.
Delphi-Quellcode:
Function PadLw (const s:string; padchar:char; len:integer):string;
begin
// pad a string from the left
result := s;
while length(result)<len do
result := padchar + result;
end;
Function PadRw (const s:string; padchar:char; len:integer):string;
begin
// pad a string to the right
result := s;
while length(result)<len do
result := result + padchar;
end;
Vielleicht hilft dir das.
Gruss