Hello,
First, thank you very much for CNPack, it makes my adoption to Delphi IDE a bit less painful (after JetBrains IDEs).
The "Procedure List" tool is very useful but it's a bit buggy on my system. It works for "current" unit or "all opened" but gives the following error with "all in project" or "all in project group" settings.
I can live with "All opened" option but the tool doesn't remember previous settings and I can't jump to "open files" without using a mouse.
So I have a few suggestions for improving the usability of Procedure List wizard:
- Make the "all opened" default or at least order scopes by their probable size so make "all opened" second option.
- Allow assignment of different shortcuts for all those different scopes.
Best,
Evren
Embarcadero® Delphi XE7 Version 21.0.17707.5020
Ver: 1.1.2.885 Build 2017.03.08
Windows 7 SP1 64Bit
(GExperts 1.37 also enabled)
Error dump:
Access violation at address 0EE1DA7F in module 'CnWizards_DXE7'. Read of address 869CEFE4.
(0003CA7F){CnWizards_DXE7.dll} [0EE1DA7F]
[505C77F2]{vcl210.bpl } Vcl.Controls.TWinControl.DefaultHandler (Line 10079, "Vcl.Controls.pas" + 30) + $19
[505CC64B]{vcl210.bpl } Vcl.Controls.TWinControl.InvalidateDockHostSite (Line 13300, "Vcl.Controls.pas" + 24) + $D
[505CC616]{vcl210.bpl } Vcl.Controls.TWinControl.CMTextChanged (Line 13262, "Vcl.Controls.pas" + 2) + $4
[507110C5]{vcl210.bpl } Vcl.Forms.TCustomForm.CMTextChanged (Line 6823, "Vcl.Forms.pas" + 1) + $2
[505C2C15]{vcl210.bpl } Vcl.Controls.TControl.WndProc (Line 7232, "Vcl.Controls.pas" + 91) + $6
(0003B2C0){CnWizards_DXE7.dll} [0EE1C2C0]
(0003CA69){CnWizards_DXE7.dll} [0EE1DA69]
(0003D2F1){CnWizards_DXE7.dll} [0EE1E2F1]
(0003DB74){CnWizards_DXE7.dll} [0EE1EB74]
[0EFF0937]{CnWizards_DXE7.dll} Unknown function at INITWIZARD0001 + $14C18F
[0EFF1BD2]{CnWizards_DXE7.dll} Unknown function at INITWIZARD0001 + $14D42A
[50059C58]{rtl210.bpl } System.@FreeMEM (Line 4439, "System.pas" + 20) + $0
[5006132C]{rtl210.bpl } System.@UStrClr (Line 24117, "System.pas" + 14) + $0
(00096CB9){CnWizards_DXE7.dll} [0EE77CB9]
[50059C58]{rtl210.bpl } System.@FreeMEM (Line 4439, "System.pas" + 20) + $0
(00097284){CnWizards_DXE7.dll} [0EE78284]
[0EFF42D6]{CnWizards_DXE7.dll} Unknown function at INITWIZARD0001 + $14FB2E
[505E6098]{vcl210.bpl } Vcl.StdCtrls.TCustomCombo.Change (Line 4344, "Vcl.StdCtrls.pas" + 2) + $12
[505E5600]{vcl210.bpl } Vcl.StdCtrls.TCustomComboBox.Change (Line 3986, "Vcl.StdCtrls.pas" + 4) + $2
[505E6263]{vcl210.bpl } Vcl.StdCtrls.TCustomCombo.Select (Line 4399, "Vcl.StdCtrls.pas" + 4) + $4
[505E6016]{vcl210.bpl } Vcl.StdCtrls.TCustomCombo.CNCommand (Line 4321, "Vcl.StdCtrls.pas" + 24) + $6
[505C2C15]{vcl210.bpl } Vcl.Controls.TControl.WndProc (Line 7232, "Vcl.Controls.pas" + 91) + $6
[505C76E2]{vcl210.bpl } Vcl.Controls.TWinControl.WndProc (Line 10038, "Vcl.Controls.pas" + 153) + $6
[5017B134]{rtl210.bpl } System.Classes.{System.Generics.Collections}TDictionary<System.Integer,System.Classes.IInterfaceList>.TryGetValue (Line 1974, "System.Generics.Collections.pas" + 6) + $2
[50172A9D]{rtl210.bpl } System.Classes.TObservers.IsObserving (Line 18580, "System.Classes.pas" + 1) + $F
[50172B18]{rtl210.bpl } System.Classes.TObservers.IsObserving (Line 18590, "System.Classes.pas" + 11) + $20
[505E5EF3]{vcl210.bpl } Vcl.StdCtrls.TCustomCombo.WndProc (Line 4293, "Vcl.StdCtrls.pas" + 70) + $4
[505E7805]{vcl210.bpl } Vcl.StdCtrls.TCustomComboBox.WndProc (Line 4999, "Vcl.StdCtrls.pas" + 27) + $4
[505C2850]{vcl210.bpl } Vcl.Controls.TControl.Perform (Line 7010, "Vcl.Controls.pas" + 10) + $8
[505C7847]{vcl210.bpl } Vcl.Controls.DoControlMsg (Line 10107, "Vcl.Controls.pas" + 12) + $11
[505C82CF]{vcl210.bpl } Vcl.Controls.TWinControl.WMCommand (Line 10382, "Vcl.Controls.pas" + 1) + $5
[505C2C15]{vcl210.bpl } Vcl.Controls.TControl.WndProc (Line 7232, "Vcl.Controls.pas" + 91) + $6
[210F232E]{designide210.bpl} DeskUtil.SetFocusHook (Line 463, "DeskUtil.pas" + 4) + $C
[505C76E2]{vcl210.bpl } Vcl.Controls.TWinControl.WndProc (Line 10038, "Vcl.Controls.pas" + 153) + $6
[505C6D1C]{vcl210.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 9750, "Vcl.Controls.pas" + 3) + $6
[5016E218]{rtl210.bpl } System.Classes.StdWndProc (Line 16600, "System.Classes.pas" + 8) + $0
[5005F3E6]{rtl210.bpl } System.@ISClass (Line 16131, "System.pas" + 1) + $8
[505C77F2]{vcl210.bpl } Vcl.Controls.TWinControl.DefaultHandler (Line 10079, "Vcl.Controls.pas" + 30) + $19
[505C82DE]{vcl210.bpl } Vcl.Controls.TWinControl.WMCommand (Line 10382, "Vcl.Controls.pas" + 1) + $14
[505C2C15]{vcl210.bpl } Vcl.Controls.TControl.WndProc (Line 7232, "Vcl.Controls.pas" + 91) + $6
[50711DE0]{vcl210.bpl } Vcl.Forms.TraverseClients3 (Line 7325, "Vcl.Forms.pas" + 5) + $1E
[50711DFA]{vcl210.bpl } Vcl.Forms.TraverseClients3 (Line 7325, "Vcl.Forms.pas" + 5) + $38
[210F232E]{designide210.bpl} DeskUtil.SetFocusHook (Line 463, "DeskUtil.pas" + 4) + $C
[505C76E2]{vcl210.bpl } Vcl.Controls.TWinControl.WndProc (Line 10038, "Vcl.Controls.pas" + 153) + $6
[5017B134]{rtl210.bpl } System.Classes.{System.Generics.Collections}TDictionary<System.Integer,System.Classes.IInterfaceList>.TryGetValue (Line 1974, "System.Generics.Collections.pas" + 6) + $2
[50172A9D]{rtl210.bpl } System.Classes.TObservers.IsObserving (Line 18580, "System.Classes.pas" + 1) + $F
[50172B18]{rtl210.bpl } System.Classes.TObservers.IsObserving (Line 18590, "System.Classes.pas" + 11) + $20
[505E5EF3]{vcl210.bpl } Vcl.StdCtrls.TCustomCombo.WndProc (Line 4293, "Vcl.StdCtrls.pas" + 70) + $4
[505E7805]{vcl210.bpl } Vcl.StdCtrls.TCustomComboBox.WndProc (Line 4999, "Vcl.StdCtrls.pas" + 27) + $4
[505C6D1C]{vcl210.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 9750, "Vcl.Controls.pas" + 3) + $6
[5016E218]{rtl210.bpl } System.Classes.StdWndProc (Line 16600, "System.Classes.pas" + 8) + $0
(0005D522){CnWizards_DXE7.dll} [0EE3E522]
[500636D0]{rtl210.bpl } System.@FinalizeArray (Line 31435, "System.pas" + 139) + $0
[500636C0]{rtl210.bpl } System.@FinalizeArray (Line 31423, "System.pas" + 127) + $0
[500636D0]{rtl210.bpl } System.@FinalizeArray (Line 31435, "System.pas" + 139) + $0
[5071635B]{vcl210.bpl } Vcl.Forms.TApplication.ProcessMessage (Line 10352, "Vcl.Forms.pas" + 23) + $1
[5071639E]{vcl210.bpl } Vcl.Forms.TApplication.HandleMessage (Line 10382, "Vcl.Forms.pas" + 1) + $4
[50711916]{vcl210.bpl } Vcl.Forms.TCustomForm.ShowModal (Line 7148, "Vcl.Forms.pas" + 33) + $5
[0EFEE536]{CnWizards_DXE7.dll} Unknown function at INITWIZARD0001 + $149D8E
(000A9543){CnWizards_DXE7.dll} [0EE8A543]
[207DEA5B]{coreide210.bpl} VClient.TOTAKeyContext.Create (Line 2968, "VClient.pas" + 3) + $7
(000A3843){CnWizards_DXE7.dll} [0EE84843]
(000A226A){CnWizards_DXE7.dll} [0EE8326A]
[207DEC43]{coreide210.bpl} VClient.KeyBindingProc (Line 3027, "VClient.pas" + 10) + $4
[5016CF68]{rtl210.bpl } System.Classes.TComponent.UpdateAction (Line 15778, "System.Classes.pas" + 1) + $15
[50711D77]{vcl210.bpl } Vcl.Forms.ProcessUpdate (Line 7308, "Vcl.Forms.pas" + 1) + $11
[5005F3E6]{rtl210.bpl } System.@ISClass (Line 16131, "System.pas" + 1) + $8
[50711DE0]{vcl210.bpl } Vcl.Forms.TraverseClients3 (Line 7325, "Vcl.Forms.pas" + 5) + $1E
[20209DF4]{htmide210.bpl} HTMLMarkupCreators.TNewSimpleMarkupPage.Selected (Line 601, "HTMLMarkupCreators.pas" + 1) + $12
[207E8414]{coreide210.bpl} KbClient.TIDEKBDFrameAPI.MapAndEvalInternal (Line 842, "KbClient.pas" + 10) + $1
[207E7E91]{coreide210.bpl} KbClient.HandleKey (Line 572, "KbClient.pas" + 6) + $2
[207E8398]{coreide210.bpl} KbClient.TIDEKBDFrameAPI.ProcessKeyStroke (Line 816, "KbClient.pas" + 234) + $3
[207E8F30]{coreide210.bpl} KbClient.TIDEKBDChildAPI.ProcessKeyStroke (Line 1368, "KbClient.pas" + 14) + $6
[207D7AAE]{coreide210.bpl} EditorControl.TCustomEditControl.DoKeyDown (Line 7529, "EditorControl.pas" + 18) + $8
[207CD356]{coreide210.bpl} EditorControl.TCustomEditControl.CNKeyDown (Line 2048, "EditorControl.pas" + 14) + $12
[505C2C15]{vcl210.bpl } Vcl.Controls.TControl.WndProc (Line 7232, "Vcl.Controls.pas" + 91) + $6
[210F232E]{designide210.bpl} DeskUtil.SetFocusHook (Line 463, "DeskUtil.pas" + 4) + $C
[505C76E2]{vcl210.bpl } Vcl.Controls.TWinControl.WndProc (Line 10038, "Vcl.Controls.pas" + 153) + $6
[505C6D1C]{vcl210.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 9750, "Vcl.Controls.pas" + 3) + $6
[5016E218]{rtl210.bpl } System.Classes.StdWndProc (Line 16600, "System.Classes.pas" + 8) + $0
[50716088]{vcl210.bpl } Vcl.Forms.TApplication.IsKeyMsg (Line 10260, "Vcl.Forms.pas" + 25) + $12
[50716122]{vcl210.bpl } Vcl.Forms.TApplication.IsHintMsg (Line 10281, "Vcl.Forms.pas" + 3) + $2
[50716337]{vcl210.bpl } Vcl.Forms.TApplication.ProcessMessage (Line 10346, "Vcl.Forms.pas" + 17) + $31
[5071639E]{vcl210.bpl } Vcl.Forms.TApplication.HandleMessage (Line 10382, "Vcl.Forms.pas" + 1) + $4
[507166D1]{vcl210.bpl } Vcl.Forms.TApplication.Run (Line 10520, "Vcl.Forms.pas" + 26) + $3