Schön und gut.
Habe zwei Probleme.
1. Der code muss definitiv in ins OnKeyPress-Ereignis (key muss vom Typ char sein und nicht vom Typ word wie es in OnKeyDown/Up ist. Aber in welches OnKeyPress muss es? Von meinem Formular funktioniert ja nicht.
2. Wenn ich es testweise in das meines Memos setze, dann wird das eingegebene Zeichen im Edit-Feld markiert, wird bei weiteren Tastenanschlägen gelöscht.
Delphi-Quellcode:
if key in [#33..#122] then
begin
form1.Edit1.Text := form1.Edit1.Text + key;
form1.Edit1.SetFocus;
end;