ok, ich habe es herrausgefunden:
nach rechts
Delphi-Quellcode:
procedure TForm1.btnrechtsClick(Sender: TObject);
var
shap1:Integer;
begin
Shape1.left:=Shape1.left+3;
end;
nach links
Delphi-Quellcode:
procedure TForm1.btnlinksClick(Sender: TObject);
var
shap1:Integer;
begin
Shape1.left:=Shape1.left-3;
end;
weiß jemand, wie ich das auf die Pfeiltasten der tastatur übertrage