Delphi-Quellcode:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if Key = 'q' then
Button1.Left := Button1.Left + 10;
if Key = 'a' then
Button2.Left := Button2.Left + 10;
if Key = 'y' then
Button3.Left := Button3.Left + 10;
end;
Vom Code her hast Du das schon richtig gemacht, allerdings hast Du ne kleinigkeit vergessen.
Geh in den Object Inspector und stelle für Form1 "KeyPreview" auf True.
Hab zwar keine Ahnung wo Du wohnst, kannst mir aber ein dunkles Weissbier schicken.
