-Allen R. Sanders
ASan...@wiseco.com
Take hold and read Mr. Francesco Balena's article in the October 1998 issue
of Visual Basic Programmer's Journal (VBPJ), entitled "Subclassing the
Visual Basic IDE". This is a very interesting and well-written article, and
it comes with a sample program that demonstrates, among other things, how to
add a shortcut key to a custom menuitem.
Here's a startup link: www.vbpj.com
Audimar
apb...@yahoo.com
"Allen R. Sanders" <ASan...@wiseco.com> wrote in message
news:DD8C7CE3FFD94B4283A804C7D7B61FB6447030@CPMSFTMSGV22...
"Audimar P. Bangi" <apb...@unity.ncsu.edu> wrote in message
news:ODkUvVpb$GA.88@cppssbbsa05...
To get the text of the article, you can sign up for "Premier Club" which
allows you download articles - they are currently offering a free 30-day
membership. But I think the code is all you need. CHotKey.cls encapulates
what you want to do.
Good luck,
Darrell Speck, MCSD
"Jean Philippe Mica" <jp....@developpeur.org> wrote in message
news:eC4OBDMc$GA.256@cppssbbsa05...
--
Donald A. Herman
Software - Scheduler Pro, Disk Cataloger, Math Wizard
http://members.tripod.com/~Don_Herman/
Home Page, VB5 & 6 Resources, Information and Links
http://www.fcs-net.com/dherman/index.htm
--
"Donald A. Herman" <dhe...@pcom.net> wrote in message
news:#AYDHhNc$GA.296@cppssbbsa05...
One thing bit me at first that may get you too. The short cut keys
never worked for me while in debug. I have to run my application
to check out the keys working. Took me a few days of pulling my
hair to figure that out.
Hard lessons are the best ones though.
Good Luck.
Clint Carter
President
CodeAvionics Software
http://www.codeavionics.com
Visual Basic IDE Power Tools
The OnAction macro is only for VBA stuff.
I believe you need the RegisterHotKey api.
Attribute VB_Name = "Shortcut_Module"
'
#VBIDEUtils#*****************************************************
*******
' * Programmer Name : Waty Thierry
' * Web Site : www.geocities.com/ResearchTriangle/6311/
' * E-Mail : waty.t...@usa.net
' * Date : 23/08/99
' * Time : 13:33
' * Module Name : Shortcut_Module
' * Module Filename : Shortcut.bas
'
*****************************************************************
*****
' * Comments :
' *
' *
'
*****************************************************************
*****
Option Explicit
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal
vKey As Long) As Integer
Public Sub ShortCutTreatment()
'
#VBIDEUtils#*****************************************************
*******
' * Programmer Name : Waty Thierry
' * Web Site :
www.geocities.com/ResearchTriangle/6311/
' * E-Mail : waty.t...@usa.net
' * Date : 23/08/99
' * Time : 13:33
' * Module Name : Shortcut_Module
' * Module Filename : Shortcut.bas
' * Procedure Name : ShortCutTreatment
' * Parameters :
'
*****************************************************************
*****
' * Comments :
' *
' *
'
*****************************************************************
*****
If (GetAsyncKeyState(vbKeyControl)) Then
If GetAsyncKeyState(Asc("[")) Or GetAsyncKeyState(Asc
("]")) Then Call GetPending
If GetAsyncKeyState(Asc("K")) Then Call ClearDebug
' ..... And so .....
End If
End Sub
* Sent from RemarQ http://www.remarq.com The Internet's Discussion Network *
The fastest and easiest way to search and participate in Usenet - Free!