Hallo,
wollte ma was schreiben was die position der maus nutzt und so einen ball immer in die richtung des zeigers bewegt...
Nun hab ich folgendes problem...ich weiss nich wie man die position der maus auf Form bekommt...ich bekomme nur die pos der maus auf dem bildschirm in pixeln brauche aber die angaben wie sie auch bei z.B. der kugel sind (z.B. left 10 top 5)
mein bisheriger TEXT:
Delphi-Quellcode:
procedure TForm1.Timer3Timer(Sender: TObject);
var
mauspos:TPoint;
begin
GetCursorPos(mausPos);
if Ball.top<mauspos.y then
b:=1; //b ist die bewegung nach oben und unten
if Ball.Top+Ball.Height>mauspos.Y then
b:=-1;
if Ball.left<mauspos.Y then
c:=1; //c ist die bewegung nach links und rechts
if Ball.Left+Ball.Width>mauspos.Y then
c:=-1;
Ball.Left:=Ball.Left+c;
Ball.Top:=Ball.Top+b;
end;
wäre toll wenn ihr mir da helfen könnt!