I’m working with Delphi 7.
When use this event onShortCut of TApplicationEvents and TcnBitBtn fucused, it dont start event onShortCut.
ex. this event dont start when cnBitBtn fucused
procedure TfrmMainMenu.AppEventsShortCut(var Msg: TWMKey; var Handled: Boolean);
begin
if (Msg.CharCode = VK_F9) and (ssCtrl in KeyboardStateToShiftState) then
begin
Handled := True;
if FormOpenIndex('TfrmHKProduto') >= 0 then
Screen.Forms[FormOpenIndex('TfrmHKProduto')].BringToFront
else
actHKProdutoExecute(Self);
end;
end;
Why this?
obs.: I'm brazilian
tksAuthor:
Passion Time: 2009-4-30 20:11
Thanks for your report.
After checking, it's a bug in our KeyDown processing method. It does not call "inherited" for somekey, which causing holding the shortcut.
Now this problem is fixed in our CVS. You can get it by CVS client.
LiuXiao, i'm brazilian, I speak portuguese and my english is so so, but dont speak chinese.
I would you help me to connect in CVS?,
I do not know to connect in CVS,
You help me connect in CVS, step by step?
thank you,
I await a response.
byeAuthor:
Passion Time: 2009-5-5 23:04
Well, you also can get this latest CnButton.pas file on our CVSTrac's web CVS.
It's another way to access single file. But if you want to get all latest cvs files, it's recommended use cvs client, such as WinCVS or TCVS.
