TApplicationEvents & TCNBitBtn incompatibilities - CnWizards IDE Wizards - CnPack Forum

KADU (Kadu)

新警察

UID 42281
Digest Posts 0
Credits 12
Posts 4
点点分 12
Reading Access 10
Registered 2009-4-29
Location Brazil
Status Offline

Post at 2009-4-30 00:51 Profile | Blog | P.M.

TApplicationEvents & TCNBitBtn incompatibilities

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

tks

Passion (LiuXiao)

管理员

UID 359
Digest Posts 19
Credits 6838
Posts 3591
点点分 6838
Reading Access 102
Registered 2004-3-28
Status Offline

Post at 2009-4-30 20:11 Profile | Blog | P.M.

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.

Information:
http://www.cnpack.org/showdetail.php?id=372&lang=en

KADU (Kadu)

新警察

UID 42281
Digest Posts 0
Credits 12
Posts 4
点点分 12
Reading Access 10
Registered 2009-4-29
Location Brazil
Status Offline

Post at 2009-5-5 20:48 Profile | Blog | P.M.

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.

bye

Passion (LiuXiao)

管理员

UID 359
Digest Posts 19
Credits 6838
Posts 3591
点点分 6838
Reading Access 102
Registered 2004-3-28
Status Offline

Post at 2009-5-5 23:04 Profile | Blog | P.M.

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.

http://www.cnpack.org:8008/cnpac ... tons.pas&v=1.23