如何实现点击按键完成Ctrl+F的操作(50分)

G

gtln

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-29

• #1

如何实现点击按键完成Ctrl+F的操作

 

B

bjaman

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-29

• #2

参考:http://www.delphibbs.com/keylife/iblog_show.asp?xid=22295

 

G

gtln

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-29

• #3

在Button的click事件中加了
Keybd_Event(VK_CONTROL,Byte(0),0,0);
Keybd_Event(Byte(70),Byte(0),0,0);
Keybd_Event(Byte(70),Byte(0),KeyEventF_KEYUP,0);
Keybd_Event(VK_CONTROL,Byte(0),KeyEventF_KEYUP,0);
可是点击后,无反应,关不出现对话框

 

G

gtln

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-29

• #4

多谢bjaman:
问题已经解决!