Hallo,
ich möchte ein eingegebenes Zeichen in den ASCII-Wert umwandeln:
Das geht hier nicht, weil der Befehl ord mit String inkopmpatibel ist.
procedure TForm1.Button1Click(Sender: TObject);
var
text:String;
umgewandelt:Integer;
begin
text:=edit1.text; //ein Zeichen eingeben
umgewandelt:=Ord(text);
panel1.caption:=InttoStr(umgewandelt);
end;
Ich will das zu umwandelnde Zeichen unbedingt eingeben können.
Hat jemand eine Lösung?
isocam Gast |