bin2dec

[Daniel B]

Also, mit Zwischenvariablen und in jeder Zeile wird was umgewandelt.
Das ist ja mal eine Herrausforderung, schriebe etwas so umständlich wie möglich. //Hmm, gar nciht so einfach

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  sEdit, sErgebnis: String;
  iEdit: Integer;
  bEdit: Byte;
begin
  sEdit := Edit1.Text; //Text aus dem Edit, also Bits einer Variable zuweisen
  iEdit := StrToInt(sEdit); //Dann die Variable in einen Integer umwandeln da der Edit es als String hat
  bEdit := Byte(iEdit); //Dann den Integer in ein Byte umwandeln
  sErgebnis := IntToStr(bEdit); //Den Wert des Bytes wieder in einen String umwandeln
  ShowMessage(sErgebnis); //Und schliesslich das Ergebniss in einer Message ausgeben
end;

Besser?

Grüsse, Daniel