Medion X10 Mausklick

[Gehstock]

also ich versuche meine Maus mit diesen Code zu Steuern das ansich klappt nur der Mausklick eben nicht

Delphi-Quellcode:

  case ecommand of
 13 : p.X := p.X - 10;  //Links
 11 : p.X := p.X + 10;  //Rechts
 19 : p.Y := p.Y - 10;  //Hoch
 12 : p.Y := p.Y + 10;  //Runter
 17 : begin
    mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0); //Linke MausT
    mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
   end;
 09 : begin
    mouse_event(MOUSEEVENTF_RIGHTDOWN, 0, 0, 0, 0); //Rechte MausT
    mouse_event(MOUSEEVENTF_RIGHTUP, 0, 0, 0, 0);
   end;
  end;//Case
  Mouse.CursorPos := p ;  //Neue Koordinaten übergeben
end;

Delphi-Quellcode:

X10CMD_MENU = $00000009; //Rechte MausT
  X10CMD_SKIP_DN = $0000000A;
  X10CMD_RIGHT = $0000000B;
  X10CMD_DN = $0000000C;
  X10CMD_LEFT = $0000000D;
  X10CMD_RETURN = $0000000E;
  X10CMD_ENTER = $0000000F;
  X10CMD_DISPLAY = $00000010;
  X10CMD_OKAY = $00000011; //Linke MausT