I uncommented two commented rows in Source \SrcEditorEnhance \CnSrcEditorCodeWrap.pas
and ShortCuts start work. Is that right?
procedure TCnSrcEditorCodeWrapTool.InitMenuItems(AMenu: TMenuItem);
var
i_: Integer;
begin
WizShortCutMgr.BeginUpdate;
try
FMenu := AMenu;
Clear;
for i_ := 0 to Items.Count - 1 do
begin
AddMenuItem(AMenu, Items[i_].Caption, OnMenuItemClick, nil, Items[i_].ShortCut, '', i_);
// --comment in China-- 2007.12.13 by LiuXiao
//if (Items[i_].Caption <> '-') and (Items[i_].ShortCut <> 0) then
//fShortCuts.Add(WizShortCutMgr.Add('', Items[i_].ShortCut, OnShortCut, '', i));
end;
AddSepMenuItem(AMenu);
AddMenuItem(AMenu, SCnWizConfigCaption, OnConfig);
finally
WizShortCutMgr.EndUpdate;
end;
end;
[ Last edited by dandcnpack at 2008-11-10 16:04 ]
|