Hallo Alle!
Ich habe auf einer Form, 2 TEdit. In dem ersten Edit möchte ich den ASC eingeben und im zweiten soll dann das entsprechende Zeichen erscheinen.
Wieso geht dieser Code nicht?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
Var A: Variant;
begin
A := Edit1.Text;
Edit2.Text := Edit2.Text + Chr(A);
end;