关于WINAPI的声明和使用？？？(100分)

J

jingzux

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-10

• #1

Public Declare Function RegisterShellHook Lib "Shell32" Alias "#181" _
(ByVal hwnd As Long, ByVal nAction As Long) As Long
这是VB的声明，在DELPHI中如何声明和使用这个函数？？

 

K

kevincsg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-10

• #2

delphi直接用就可以了，但先要找出registershellhook是属于哪个单元文件,
你可以在用这个方法试试，在windows中查找*.pas文件，再在查找文字中输入registershellhook
,找到了单元文件后，就可以在uses中引用这个文件就可以了

 

Y

yexiaofeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-10

• #3

不需要声明
只要在USE中加入WINDOWS就可以了

 

H

htw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-10

• #4

不用声明

 

J

jingzux

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-10

• #5

这是一个没有公开的函数，在DELPHI　5。0中的单元是没有的，必需声明才能使用。
我这样声明，说是找不到的入口。
Function RegisterShellHook(hwnd ,nAction:integer):integer
stdcall
external 'Shell32.dll'
VB就没有问题。

 

M

mantousoft

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-10

• #6

一般情况下,使用WINAPI在USES声明ShellAPI就可以了,如果特殊的没有的
可以察看delphi的帮助,看看那个函数在什么单元,加入USES就可以了.

 

B

bbkxjy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-10

• #7

可能要通过序数来引入，试试：
Function RegisterShellHook(hwnd ,nAction:integer):integer
stdcall

external 'Shell32.dll' index 181;

 

J

jingzux

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-10

• #8

谢谢各位了，我采用bbkxjy答案已能正常运行了。又多了一个WINDOWS　API了。
以前有人(包括我)问过用DELPHI编写系统钩子有非法操作发生。其实WINDOWS本身就自带
有，只是没有公开。这个API就是SHELL消息钩子。很稳定。