Textergänzer

[cchris]

Ich hab das jez so umgeändert und jez funzts:

Delphi-Quellcode:

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
   if (wparam=$4D)or(lParam=$4D) then Result:=-1
    end;
  end;
end;

Danke nochmal für die Hilfe sonst hätt ich das nie geschafft, das hinzukriegen.

cu Chris