Problem with keyboard

Hi,

Thanks for great IDE tools. I use them very often. But there one thing that anoying me every day.

Problem is introduced only after installing CnWizards. After disabling expert all works fine again...

Environment:
[list][*]Delphi 7[*][b]IDE Classic key mapping[/b][*]Windows XP Proffesional SP2[*]CnPack IDE Wizards, ver 0.8.2.311_Unstable Build 2007.04.30[/list]Steps:
[list][*]Create New Application[*]Press [b]Shift+F2 [/b](Save All) Save dilaog appeared. Press cancel.[*]Result: keyboard in editor won't work.[/list]As workaround i press [b]Alt [/b]key and then [b]Esc.[/b] This situation is always reproducible on different computers.
I think problem with some windows hook used in CnWizards.

TIA,
Dans

Maybe it is caused by control's focus issue.

May I ask when you press SHIFT+F2? In editor or Form Designer?

If Editor, it will call our Input Helper's hotkey to enable/disable auto-popup. Not save all.

If in Form it will call save all. and if we press cancel and click editor to edit source, all works fine in my workstation. No keys blocked.

I don't know how to reproduce the problem.
Did you install other wizards?

Reply #2 shenloqi's post

Hi,

I pressed Shift+F2 in Editor. Sometimes keyboard won't work for other shortcuts, but before problem always present ModalDialog.
Yes, i have many experts :)
[list][*]MMX[*]GExperts[*]VssConnexion[*]Castalia[*]DelphiSpeedup[/list]I disabled all of them - this is first thing that i did during searching wich expert causes this situation.
Ok, i'll try to debug your sources and tell about results. Nice if you will have time to fix  :handshake

TIA,
Dans

I found problem

Hi again

I found what causes problem:
Three hours of deep debugging... damn it.

unit: [b]CnWizShortCut.pas [/b]

[font=Courier New]
[b][table=98%][tr][td][color=#000000][size=9pt][b]procedure [/b][/size]TCnWizShortCutMgr.InstallKeyBinding;[/color][size=9pt][color=#000000]
...[/color][/size]
[size=9pt][color=#000000]  [b]if not[/b] IsEmpty [b]then[/b][/color][/size]
[size=9pt][color=#000000]  [b]begin[/b][/color][/size]
[size=9pt][color=#000000]    QuerySvcs(BorlandIDEServices, IOTAKeyboardServices, KeySvcs);[/color][/size]
[size=9pt][color=#000000]    SaveMainMenuShortCuts;[/color][/size]
[size=9pt][color=#000000]    [b]try[/b][/color][/size]
[size=9pt][color=#000000]      [b]try[/b][/color][/size]
[size=9pt][color=#000000]        FKeyBindingIndex := KeySvcs.AddKeyboardBinding(TCnKeyBinding.Create(Self));[/color][/size]
[size=9pt][color=#000000]        [/color][color=red][b]KeySvcs.PushKeyboard(SCnPackKeyboard); [color=blue]// This method must be called only once per session[/color][/b][/color][/size]
[size=9pt][color=red][b][color=blue][/color][/b][/color][/size]
[size=9pt][color=red][b][color=blue]        if FPushed then // Add boolean field FPushed[/color][/b][/color][/size]
[size=9pt][color=red][b][color=blue]        begin[/color][/b][/color][/size]
[size=9pt][color=red][b][color=blue][size=9pt][color=blue]          [b]KeySvcs.PushKeyboard(SCnPackKeyboard);[/b][/color][/size]
[size=9pt]          FPushed := True;[/size]
[/color][/b][/color][/size][size=9pt][color=red][b][color=blue]        end;[/color][/b][/color][/size]
[size=9pt][color=#000000]      [b]except[/b][/color][/size]
[size=9pt][color=#000000]        ;[/color][/size]
[size=9pt][color=#000000]      [b]end[/b];[/color][/size]
[size=9pt][color=#000000]    [b]finally[/b][/color][/size]
[size=9pt][color=#000000]      RestoreMainMenuShortCuts;[/color][/size]
[size=9pt][color=#000000]    [b]end[/b];[/color][/size]
[size=9pt][color=#000000]  [b]end[/b];[/color][/size]
[color=#000000][b]end[/b];[/color]
[/td][/tr][/table][/b]
[color=#000000][/color]
[/font]
Can you fix this?

Thanks,
Dans

Good!
Much Thanks for your professional debugging skills! It fixed not only your problem, but also our another problem of keyboard not working after ALG+G dialog, which aannoy us for a long time.

You'll in our credits list.:handshake

Reply #6 Passion's post

Hi,

Sorry for new bug :loveliness:

if [b]not[/b] FPushed then

BTW, as i saw [b]PushKeyboard[/b] is not used in GExperts and other experts. What is the meaning of using this function?
Pair function PopKeyboard does'nt resolves problem.

Best regards,
Dans

Reply #6 Passion's post

ALG+G dialog... :)

Yes i it's causes the same problem. But i never give up :victory:
I tried everything, debug your hooks, ApplicationMessage, Trap Messages, test many supposition. But all without results.
Then i start commenting your DPR file (binary) and found unit that causes problem, then comment half of unit, debug, debug...

Best regards,
Dans

Hard works, three hour deep debug.:victory: