View Issue Details

IDProjectCategoryView StatusLast Update
0004518JEDI VCL00 JVCL Componentspublic2008-10-10 00:36
ReporterakalwaAssigned Toobones 
PrioritynormalSeveritycrashReproducibilityalways
Status resolvedResolutionfixed 
Product VersionDaily / GIT 
Target VersionFixed in Version3.36 
Summary0004518: AV when deleting a JvMainMenu in designer; IDE becomes unstable
Description- Start a new Win32 project
- put a TJvMainMenu on the form
- place a TImageList
- Load some 16x16 Images into ImageList
- Connect ImageList to JvMainMenu
- Add some menu items to JvMainMenu; select an image index!
(or load attached example project)

Click the JvMainMenu; then press "Del" button.
-> Boom.

reproducible with Delphi 2007 Professional; Delphi 2009 Enterprise.
Additional InformationCall stack (Delphi 2007):
[200317B5]{rtl100.bpl } Classes.TList.Get (Line 2993, "common\Classes.pas" + 3) + $3
[20006D23]{rtl100.bpl } System.@HandleAnyException (Line 9963, "sys\system.pas" + 13) + $0
[2013C527]{vcl100.bpl } Controls.TControl.WndProc (Line 5146, "Controls.pas" + 83) + $6
[2001DBF6]{rtl100.bpl } Variants.VarClearDeep (Line 721, "sys\variants.pas" + 9) + $3
[2002246B]{rtl100.bpl } Variants.@VarFromBool (Line 2660, "sys\variants.pas" + 2) + $2
[20003DC4]{rtl100.bpl } System.@FreeMem (Line 2699, "sys\system.pas" + 2) + $0
[20007A19]{rtl100.bpl } System.@LStrArrayClr (Line 12266, "sys\system.pas" + 16) + $0
[2001DC5D]{rtl100.bpl } Variants.@VarClr (Line 759, "sys\variants.pas" + 1) + $0
[20DF97A6]{vclide100.bpl} IDERegIniPropSet.TRegistryPropSet.GetFieldData (Line 178, "IDERegIniPropSet.pas" + 41) + $8E
[2004A2EA]{rtl100.bpl } Contnrs.TObjectList.GetItem (Line 295, "common\Contnrs.pas" + 1) + $4
[49B37747]{JvStdCtrlsD11R.bpl} Jvmenus.TJvMainMenu.MenuChanged + $3B
[20130685]{vcl100.bpl } Menus.TMenuItem.MenuChanged (Line 2314, "Menus.pas" + 4) + $15
[20130538]{vcl100.bpl } Menus.TMenuItem.Delete (Line 2265, "Menus.pas" + 7) + $10
[20130644]{vcl100.bpl } Menus.TMenuItem.Remove (Line 2304, "Menus.pas" + 3) + $4
[2012D134]{vcl100.bpl } Menus.TMenuItem.Destroy (Line 829, "Menus.pas" + 4) + $2
[2000679C]{rtl100.bpl } System.TObject.Free (Line 8832, "sys\system.pas" + 1) + $4
[2012D149]{vcl100.bpl } Menus.TMenuItem.Destroy (Line 832, "Menus.pas" + 7) + $9
[2000679C]{rtl100.bpl } System.TObject.Free (Line 8832, "sys\system.pas" + 1) + $4
[2013191E]{vcl100.bpl } Menus.TMenu.Destroy (Line 2915, "Menus.pas" + 1) + $3
[49B376CD]{JvStdCtrlsD11R.bpl} Jvmenus.TJvMainMenu + $6D
[2000679C]{rtl100.bpl } System.TObject.Free (Line 8832, "sys\system.pas" + 1) + $4
[20D4BCD5]{designide100.bpl} ComponentDesigner.TComponentRoot.DeleteSelection (Line 4593, "ComponentDesigner.pas" + 44) + $2
[20D4BD01]{designide100.bpl} ComponentDesigner.TComponentRoot.DeleteSelection (Line 4596, "ComponentDesigner.pas" + 47) + $B
[20D5BA1F]{designide100.bpl} Surface.TDesignSurface.DeleteSelection (Line 193, "surface.pas" + 0) + $7
[20D30C4B]{designide100.bpl} Designer.TDesigner.DeleteSelection (Line 751, "Designer.pas" + 2) + $5
[20D2FFBA]{designide100.bpl} Designer. + $0
[20D3326A]{designide100.bpl} Designer.TDesigner.Key (Line 1547, "Designer.pas" + 4) + $3
[20D2FFBA]{designide100.bpl} Designer. + $0
[0587A29C]{vcldesigner100.bpl} VCLSurface.KeyEvent (Line 2974, "vclsurface.pas" + 8) + $1E
[0587AB9E]{vcldesigner100.bpl} VCLSurface.TVclDesignSurface.IsDesignMsg (Line 3156, "vclsurface.pas" + 61) + $6
[2013C2AF]{vcl100.bpl } Controls.TControl.WndProc (Line 5067, "Controls.pas" + 4) + $21
[201406A7]{vcl100.bpl } Controls.TWinControl.WndProc (Line 7304, "Controls.pas" + 111) + $6
[20159E7F]{vcl100.bpl } Forms.TCustomForm.WndProc (Line 3512, "Forms.pas" + 136) + $5
[20D1972A]{designide100.bpl} DeskUtil.SetFocusHook (Line 435, "DeskUtil.pas" + 4) + $C
[49B37B78]{JvStdCtrlsD11R.bpl} Jvmenus.TJvMainMenu.NewWndProc + $18
[49D127CB]{JvSystemD11R.bpl} Jvwndprochook.ReleaseObj + $803
[49D127FD]{JvSystemD11R.bpl} Jvwndprochook.ReleaseObj + $835
[2003203C]{rtl100.bpl } Classes.TThreadList.UnlockList (Line 3359, "common\Classes.pas" + 0) + $4
[200EBAA8]{vcl100.bpl } Graphics.FreeMemoryContexts (Line 5060, "Graphics.pas" + 12) + $5
[201406A7]{vcl100.bpl } Controls.TWinControl.WndProc (Line 7304, "Controls.pas" + 111) + $6
[2013FDD0]{vcl100.bpl } Controls.TWinControl.MainWndProc (Line 7073, "Controls.pas" + 3) + $6
[2013FDE5]{vcl100.bpl } Controls.TWinControl.MainWndProc (Line 7076, "Controls.pas" + 6) + $0
[20159E7F]{vcl100.bpl } Forms.TCustomForm.WndProc (Line 3512, "Forms.pas" + 136) + $5
[21D93E3F]{delphivclide100.bpl} VCLFormContainer.TControlSizer.ControlWndProc (Line 306, "VCLFormContainer.pas" + 33) + $C
[49D12744]{JvSystemD11R.bpl} Jvwndprochook.ReleaseObj + $77C
[2013FDD0]{vcl100.bpl } Controls.TWinControl.MainWndProc (Line 7073, "Controls.pas" + 3) + $6
[20040E4C]{rtl100.bpl } Classes.StdWndProc (Line 11583, "common\Classes.pas" + 8) + $0
[201625F0]{vcl100.bpl } Forms.TApplication.ProcessMessage (Line 8105, "Forms.pas" + 23) + $1
[2016262A]{vcl100.bpl } Forms.TApplication.HandleMessage (Line 8124, "Forms.pas" + 1) + $4
[2016291F]{vcl100.bpl } Forms.TApplication.Run (Line 8223, "Forms.pas" + 20) + $3
[0042297A]{bds.exe } bds.bds (Line 195, "" + 7) + $7
TagsNo tags attached.

Activities

2008-10-09 12:28

 

JvMainMenuCrash.zip (1,641 bytes)

obones

2008-10-10 00:36

administrator   ~0014801

This is now fixed in SVN.

Issue History

Date Modified Username Field Change
2008-10-09 12:28 akalwa New Issue
2008-10-09 12:28 akalwa File Added: JvMainMenuCrash.zip
2008-10-10 00:36 obones Status new => resolved
2008-10-10 00:36 obones Fixed in Version => Daily / SVN
2008-10-10 00:36 obones Resolution open => fixed
2008-10-10 00:36 obones Assigned To => obones
2008-10-10 00:36 obones Note Added: 0014801