Usando Hook Procedure - Ajuda para unir 2 dll em um projeto.
Encontrei aqui no forum links para utilizar hooks de teclado e mouse. Nos exemplos citados abaixo os projetos estao separados, um pra mouse e outro pra teclado.
Estou com dificuldades de unir os codigos em uma dll.
Segue o erro:
library HookMouseTeclado;
{Demo de Hook de Ratón a nivel de sistema, Radikal.}
uses Windows, Messages;
const
CM_MANDA_DATOS = WM_USER + $1000; \\\ dll do mouse
CM_MANDA_TECLA = WM_USER + $1000; \\ dll teclado
Nas linhas acima esta dando erro.. Diz que nao posso utilizar o metdo acima duas vezes. Pois estava tentando carregar as duas dll´s, pois nao tive sucesso ao tentar montar uma dll so ..
Estou com dificuldades de unir os codigos em uma dll.
Segue o erro:
library HookMouseTeclado;
{Demo de Hook de Ratón a nivel de sistema, Radikal.}
uses Windows, Messages;
const
CM_MANDA_DATOS = WM_USER + $1000; \\\ dll do mouse
CM_MANDA_TECLA = WM_USER + $1000; \\ dll teclado
Nas linhas acima esta dando erro.. Diz que nao posso utilizar o metdo acima duas vezes. Pois estava tentando carregar as duas dll´s, pois nao tive sucesso ao tentar montar uma dll so ..
Waltherjr
Curtidas 0
Respostas
Waltherjr
08/08/2006
Completando ...
Erro: duplicate message method index
Na seguinte linha
procedure LlegaDelHook(var message: TMessage); message; CM_MANDA_DATOS ;
procedure LlegaDelHook(var message: TMessage); message CM_MANDA_teclas;
Erro: duplicate message method index
Na seguinte linha
procedure LlegaDelHook(var message: TMessage); message; CM_MANDA_DATOS ;
procedure LlegaDelHook(var message: TMessage); message CM_MANDA_teclas;
GOSTEI 0
Waltherjr
08/08/2006
Completando ...
Erro: duplicate message method index
Na seguinte linha
procedure LlegaDelHook(var message: TMessage); message; CM_MANDA_DATOS ;
procedure LlegaDelHook(var message: TMessage); message CM_MANDA_teclas;
Erro: duplicate message method index
Na seguinte linha
procedure LlegaDelHook(var message: TMessage); message; CM_MANDA_DATOS ;
procedure LlegaDelHook(var message: TMessage); message CM_MANDA_teclas;
GOSTEI 0