Hallo, ich hab ein kleines Problem.
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14:
| procedure keycheck; begin while true do begin if boolean(getasynckeystate(vk_left)) then form1.shape1.left:= form1.shape1.left -50; if boolean(getasynckeystate(vk_right)) then form1.Shape1.left:= form1.Shape1.Left +50; if boolean(getasynckeystate(vk_up)) then form1.shape1.Top :=form1.shape1.Top -50; if boolean(getasynckeystate(vk_down)) then form1.shape1.top:= form1.shape1.top +50; end; end; |
Ich möchte Shape1 nur verschieben. Shape1 wird zwar an der neuen Position angezeigt, ist aber auch immer noch auf der alten Positon zu sehen. Wie kann ich die alte Positon löschen?
Arbeite erst sehr kurz mit Delphi,
Vielen Danke jür jede Hilfe.
Moderiert von
raziel: Delphi-Tags hinzugefügt.