Thema: Maus Pos

Einzelnen Beitrag anzeigen

jonsen2.0.0.9

Registriert seit: 5. Dez 2009
67 Beiträge
 
Delphi 7 Personal
 
#3

Re: Maus Pos

  Alt 5. Dez 2009, 17:39
kannste mir ma zeigen wie dat genau geht hab jetzt so:

Delphi-Quellcode:
GetCursorPos(mausPos);
ScreenToClient(Mauspos);
 if Ball.top<mauspos.y then
  b:=1;
 if Ball.Top+Ball.Height>mauspos.Y then
  b:=-1;
 if Ball.left<mauspos.Y then
  c:=1;
 if Ball.Left+Ball.Width>mauspos.Y then
  c:=-1;
Ball.Left:=Ball.Left+c;
Ball.Top:=Ball.Top+b;
was muss man noch ändern?
muss vor
ScreenToClient(Mauspos); noch nen Mauspos:= oder so?
  Mit Zitat antworten Zitat