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
