Maus Position ändern??

[mkinzler]

Tastaturhook

[DeddyH]

Oder HotKeys registrieren, dazu brauchst Du aber dann noch weitere Tasten.

[TitanNano]

okay und woher bekomme ich diesen Hook??

[mkinzler]

Aber ich fände es echt blöd, wenn ich in Word eine der genannten tasten (WASD) drücken würde, statt der Buchstaben die Maus sich verschieben würde

[mkinzler]

Zitat von TitanNano:

okay und woher bekomme ich diesen Hook??

Selber schreiben

[blackfin]

Vollkommene Zustimmung, das wäre nervig ohne Ende.

Was hast du damit eigentlich genau vor?
Warum reicht es nicht, dass du die Tasten abfrägst, wenn deine Applikation auch gerade die aktive ist?
WASD klingt doch irgendwie nach Spiel-Steuerung und die muss definitiv nur dann aktiv sein, wenn ich das Spiel auch gerade aktiv habe..

[himitsu]

• wo ist m deklariert?
• warum ist m keine lokale Variable?
  (bestifft Beitrag #5 und #9)
• SetCursorPos hat Rückgabewerte
  

  Zitat:

  Return Value
  
  BOOL
  
  Returns nonzero if successful or zero otherwise. To get extended error information, call GetLastError.

  sowas könnte/sollte man mal auswerten (vorallem wenn es Probleme gibt)

[TitanNano]

also wenn ich nun meine Maus auf einen Ordner lenke und dann klick, dann ist die Steuerung weg und das ist doof!!

Edit:
ich habe mir folgenden Tastatur hook aus dem Internet geholt:

Delphi-Quellcode:

library KeyboardHook;

uses
  Windows,
  Messages;

var
  HookHandle: Cardinal = 0;
  WindowHandle: Cardinal = 0;

function KeyboardHookProc(nCode: Integer; wParam: WPARAM; lParam: LPARAM):
LRESULT; stdcall;
begin
//es ist ebenfalls möglich die Bearbeitung an eine Bedingung zu knüpfen
//it's possible to call CallNextHookEx conditional only.
  Result := CallNextHookEx(HookHandle, nCode, wParam, lParam);
  case nCode < 0 of
    TRUE: exit; //wenn code kleiner 0 wird nix gemacht
                //if code smaller 0 nothing has to be done
    FALSE:
      begin
//Hier kann jetzt alles bearbeitet werden
//Here one can work with the parameters
      end;
  end;
end;

function InstallHook(Hwnd: Cardinal): Boolean; stdcall;
begin
  Result := False;
  if HookHandle = 0 then begin
//Erstmal Hook installieren
//First install the hook
    HookHandle := SetWindowsHookEx(WH_KEYBOARD, @KeyboardHookProc,
    HInstance, 0);
//Uebergebenes Fensterhandle sichern
//Save the given window handle
    WindowHandle := Hwnd;
    Result := TRUE;
  end;
end;

function UninstallHook: Boolean; stdcall;
begin
//Hook aus der Hookchain entfernen
//Uninstall hook from hook chain
  Result := UnhookWindowsHookEx(HookHandle);
  HookHandle := 0;
end;

exports
//Installations- und Deinstallationsroutine exportieren
//Export the installation and deinstallation routine
  InstallHook,
  UninstallHook;
end.

doch bei,

Delphi-Quellcode:

HookHandle := SetWindowsHookEx(WH_KEYBOARD, @KeyboardHookProc,
    HInstance, 0);

Kommt immer "[Error] Window.pas(129): Variable required" habe ich irgend was falsch kopiert oder Stimmt der Hook nicht??