?是一??DLL,可以?r截??列印,???如何用?

jokedj

?是一??DLL,可以?r截??列印,???如何用?
1.如何????要?髂切???
2.如何??出同?庸δ艿?OURCE CODE?
void* WINAPI InitHook(void* Hinstance,void* hCurrentProcHandle,DWORD dwCurrentThreadID);
void WINAPI UnInitHook(void* DataPtr);

jokedj

library  KeyHook;
uses Windows, Messages;
var  HKeyHooK: DWORD;

function KeyHookPro(Code: Integer; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;
begin
     Result := CallNextHookEx(HKeyHooK, code, Wparam, lParam);

     IF (code=HC_ACTION) and (wParam=Ord('P')) THEN
     SendMessage(HWND_BROADCAST, WM_CHAR,0,((LParam shr 31)and 1));
END;

procedure HookOn;  begin HKeyHooK := SetWindowsHookEx(WH_KEYBOARD, KeyHookPro, HInstance, 0); end;
procedure HookOff; begin UnHookWindowsHookEx(HKeyHooK); end;
exports  HookOn, HookOff;
begin
end.

jokedj

要使程式?绦嗅?o法??列印,有些印表?C能?定??列印,像EPSON C60,我不想有?客??绦蓄A?列印,