Jump to content
Fons N

Delphi and Peganza Expert causes access violation

Recommended Posts

Hello,

 

I just did a clean install of Delphi Pro 10.4.2. All went smoothly. Than I installed Peganza Expert. When starting Delphi immediately there is an access violation. After uninstalling Peganza Expert all is fine again.

 

Have any of you have similar problems?  I had no problems with Delphi 10.4.1.  I contacted Peganza but I thought I ask here also.

 

For those of you that are way smarter than me, below is the report of the access violation. I have no clue.

 

Thanks.

 

Fons

 

 

 

[77EAF653]{ntdll.dll   } Unknown function at RtlDllShutdownInProgress + $A3
[50F4EBD3]{vcl270.bpl  } Vcl.Styles.TCustomStyle.SourceLoaded (Line 3310, "Vcl.Styles.pas" + 1) + $13
[50CFCBF4]{vcl270.bpl  } Vcl.Controls.TWinControl.WMPaint (Line 10711, "Vcl.Controls.pas" + 6) + $5
[50F394FF]{vcl270.bpl  } Vcl.Styles.DrawControlBackground (Line 7121, "StyleAPI.inc" + 69) + $C
[50CD0C82]{vcl270.bpl  } Vcl.Graphics.TCustomCanvas.Lock (Line 3700, "Vcl.Graphics.pas" + 7) + $4
[50CD7259]{vcl270.bpl  } Vcl.Graphics.TBitmapCanvas.CreateHandle (Line 7413, "Vcl.Graphics.pas" + 3) + $3
[50CD1DE1]{vcl270.bpl  } Vcl.Graphics.TCanvas.RequiredState (Line 4278, "Vcl.Graphics.pas" + 6) + $4
[50CD1CF9]{vcl270.bpl  } Vcl.Graphics.TCanvas.GetHandle (Line 4230, "Vcl.Graphics.pas" + 2) + $B
[08638009]{themeloader270.bpl} Idetheme.Vclstylehooks.TToolBarIDEStyleHook.Paint + $E9
[50CFA393]{vcl270.bpl  } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9344, "Vcl.Controls.pas" + 0) + $F
[50CFBA9A]{vcl270.bpl  } Vcl.Controls.TWinControl.WndProc (Line 10256, "Vcl.Controls.pas" + 1) + $53
[50060764]{rtl270.bpl  } System.TMonitor.Enter (Line 19592, "System.pas" + 4) + $2
[50CD802A]{vcl270.bpl  } Vcl.Graphics.CopyBitmap (Line 8001, "Vcl.Graphics.pas" + 184) + $A
[5006063C]{rtl270.bpl  } System.TMonitor.Destroy (Line 19528, "System.pas" + 0) + $0
[5005FD59]{rtl270.bpl  } System.TObject.CleanupInstance (Line 18181, "System.pas" + 23) + $0
[5005A25C]{rtl270.bpl  } System.@FreeMem (Line 4891, "System.pas" + 20) + $0
[5005FB7C]{rtl270.bpl  } System.TObject.FreeInstance (Line 17870, "System.pas" + 2) + $2
[50060382]{rtl270.bpl  } System.@ClassDestroy (Line 19294, "System.pas" + 0) + $2
[5005FC74]{rtl270.bpl  } System.TObject.Free (Line 17933, "System.pas" + 1) + $4
[50CD7370]{vcl270.bpl  } Vcl.Graphics.TSharedImage.Release (Line 7480, "Vcl.Graphics.pas" + 7) + $2
[50CD96A6]{vcl270.bpl  } Vcl.Graphics.TBitmap.NewImage (Line 9164, "Vcl.Graphics.pas" + 36) + $5
[50CD350B]{vcl270.bpl  } Vcl.Graphics.TGraphic.Changed (Line 5427, "Vcl.Graphics.pas" + 2) + $4
[50CD157F]{vcl270.bpl  } Vcl.Graphics.TCanvas.FillRect (Line 3966, "Vcl.Graphics.pas" + 4) + $4
[50DF811A]{vcl270.bpl  } Vcl.Themes.TStyleHook.PaintBackground (Line 7196, "Vcl.Themes.pas" + 2) + $10
[50DF822C]{vcl270.bpl  } Vcl.Themes.TStyleHook.WMPaint (Line 7226, "Vcl.Themes.pas" + 18) + $12
[50DF86AA]{vcl270.bpl  } Vcl.Themes.TStyleHook.WndProc (Line 7397, "Vcl.Themes.pas" + 38) + $6
[50DF88A0]{vcl270.bpl  } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7505, "Vcl.Themes.pas" + 0) + $0
[50D8EB16]{vcl270.bpl  } Vcl.ComCtrls.TToolBarStyleHook.WndProc (Line 33588, "Vcl.ComCtrls.pas" + 6) + $4
[50DF7EC6]{vcl270.bpl  } Vcl.Themes.TStyleHook.HandleMessage (Line 7110, "Vcl.Themes.pas" + 20) + $6
[50F4F3BE]{vcl270.bpl  } Vcl.Styles.TStyleEngine.HandleMessage (Line 3598, "Vcl.Styles.pas" + 22) + $B
[50DF4E24]{vcl270.bpl  } Vcl.Themes.TStyleManager.HandleMessage (Line 5665, "Vcl.Themes.pas" + 11) + $11
[50CFA393]{vcl270.bpl  } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9344, "Vcl.Controls.pas" + 0) + $F
[50CFBA9A]{vcl270.bpl  } Vcl.Controls.TWinControl.WndProc (Line 10256, "Vcl.Controls.pas" + 1) + $53
[50DFDA7D]{vcl270.bpl  } Vcl.Themes.{System.Generics.Collections}TDictionary<System.TClass,System.Generics.Collections.TList<Vcl.Themes.TStyleHookClass>>.ContainsKey (Line 7415, "System.Generics.Collections.pas" + 1) + $F
[50D7EFFE]{vcl270.bpl  } Vcl.ComCtrls.TToolBar.WndProc (Line 24912, "Vcl.ComCtrls.pas" + 104) + $6
[50CFB614]{vcl270.bpl  } Vcl.Controls.TWinControl.MainWndProc (Line 10113, "Vcl.Controls.pas" + 3) + $6
[501826A4]{rtl270.bpl  } System.Classes.StdWndProc (Line 18175, "System.Classes.pas" + 😎 + $0
[218D5B3F]{vclactnband270.bpl} Vcl.ActnMenus.CallWindowHook (Line 762, "Vcl.ActnMenus.pas" + 20) + $F
[50CFF425]{vcl270.bpl  } Vcl.Controls.TWinControl.Update (Line 12478, "Vcl.Controls.pas" + 1) + $12
[50CFF43D]{vcl270.bpl  } Vcl.Controls.TWinControl.Repaint (Line 12484, "Vcl.Controls.pas" + 2) + $4
[50D80DBE]{vcl270.bpl  } Vcl.ComCtrls.TToolBar.Resize (Line 25932, "Vcl.ComCtrls.pas" + 3) + $4
[50CFD366]{vcl270.bpl  } Vcl.Controls.TWinControl.WMSize (Line 10932, "Vcl.Controls.pas" + 20) + $6
[50D7D508]{vcl270.bpl  } Vcl.ComCtrls.TToolBar.WMSize (Line 23941, "Vcl.ComCtrls.pas" + 1) + $2
[50060197]{rtl270.bpl  } System.TObject.Dispatch (Line 18835, "System.pas" + 11) + $0
[50CF7172]{vcl270.bpl  } Vcl.Controls.TControl.WndProc (Line 7480, "Vcl.Controls.pas" + 91) + $6
[500646D9]{rtl270.bpl  } System.@FinalizeArray (Line 33228, "System.pas" + 24) + $6
[50064570]{rtl270.bpl  } System.@FinalizeRecord (Line 33044, "System.pas" + 56) + $1E
[50DF4D77]{vcl270.bpl  } Vcl.Themes.TStyleManager.GetStyle (Line 5636, "Vcl.Themes.pas" + 18) + $1E
[50CF8C36]{vcl270.bpl  } Vcl.Controls.TControl.GetStyleName (Line 8510, "Vcl.Controls.pas" + 1) + $8
[50060197]{rtl270.bpl  } System.TObject.Dispatch (Line 18835, "System.pas" + 11) + $0
[50DF86AA]{vcl270.bpl  } Vcl.Themes.TStyleHook.WndProc (Line 7397, "Vcl.Themes.pas" + 38) + $6
[50DF88A0]{vcl270.bpl  } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7505, "Vcl.Themes.pas" + 0) + $0
[50D8EB16]{vcl270.bpl  } Vcl.ComCtrls.TToolBarStyleHook.WndProc (Line 33588, "Vcl.ComCtrls.pas" + 6) + $4
[50DF7EC6]{vcl270.bpl  } Vcl.Themes.TStyleHook.HandleMessage (Line 7110, "Vcl.Themes.pas" + 20) + $6
[50F4F3BE]{vcl270.bpl  } Vcl.Styles.TStyleEngine.HandleMessage (Line 3598, "Vcl.Styles.pas" + 22) + $B
[50DF4E24]{vcl270.bpl  } Vcl.Themes.TStyleManager.HandleMessage (Line 5665, "Vcl.Themes.pas" + 11) + $11
[50CFA393]{vcl270.bpl  } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9344, "Vcl.Controls.pas" + 0) + $F
[50CFC0C7]{vcl270.bpl  } Vcl.Controls.TWinControl.WndProc (Line 10424, "Vcl.Controls.pas" + 169) + $6
[50D7EFFE]{vcl270.bpl  } Vcl.ComCtrls.TToolBar.WndProc (Line 24912, "Vcl.ComCtrls.pas" + 104) + $6
[500605CC]{rtl270.bpl  } System.TMonitor.CheckOwningThread (Line 19506, "System.pas" + 2) + $0
[500608F2]{rtl270.bpl  } System.TMonitor.Exit (Line 19696, "System.pas" + 1) + $2
[5006094E]{rtl270.bpl  } System.TMonitor.Exit (Line 19718, "System.pas" + 2) + $7
[50CD709D]{vcl270.bpl  } Vcl.Graphics.FreeMemoryContexts (Line 7281, "Vcl.Graphics.pas" + 12) + $8
[50CFB614]{vcl270.bpl  } Vcl.Controls.TWinControl.MainWndProc (Line 10113, "Vcl.Controls.pas" + 3) + $6
[501826A4]{rtl270.bpl  } System.Classes.StdWndProc (Line 18175, "System.Classes.pas" + 😎 + $0
[218D5B3F]{vclactnband270.bpl} Vcl.ActnMenus.CallWindowHook (Line 762, "Vcl.ActnMenus.pas" + 20) + $F
[50CFC1D2]{vcl270.bpl  } Vcl.Controls.TWinControl.DefaultHandler (Line 10465, "Vcl.Controls.pas" + 30) + $19
[50CF7C84]{vcl270.bpl  } Vcl.Controls.TControl.WMWindowPosChanged (Line 7795, "Vcl.Controls.pas" + 1) + $6
[50CFD276]{vcl270.bpl  } Vcl.Controls.TWinControl.WMWindowPosChanged (Line 10882, "Vcl.Controls.pas" + 12) + $4
[50D7D616]{vcl270.bpl  } Vcl.ComCtrls.TToolBar.WMWindowPosChanged (Line 23987, "Vcl.ComCtrls.pas" + 16) + $4
[50CF7172]{vcl270.bpl  } Vcl.Controls.TControl.WndProc (Line 7480, "Vcl.Controls.pas" + 91) + $6
[500646D9]{rtl270.bpl  } System.@FinalizeArray (Line 33228, "System.pas" + 24) + $6
[50064570]{rtl270.bpl  } System.@FinalizeRecord (Line 33044, "System.pas" + 56) + $1E
[50DF4D77]{vcl270.bpl  } Vcl.Themes.TStyleManager.GetStyle (Line 5636, "Vcl.Themes.pas" + 18) + $1E
[50CF8C36]{vcl270.bpl  } Vcl.Controls.TControl.GetStyleName (Line 8510, "Vcl.Controls.pas" + 1) + $8
[50060197]{rtl270.bpl  } System.TObject.Dispatch (Line 18835, "System.pas" + 11) + $0
[50DF86AA]{vcl270.bpl  } Vcl.Themes.TStyleHook.WndProc (Line 7397, "Vcl.Themes.pas" + 38) + $6
[50DF88A0]{vcl270.bpl  } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7505, "Vcl.Themes.pas" + 0) + $0
[50D8EB16]{vcl270.bpl  } Vcl.ComCtrls.TToolBarStyleHook.WndProc (Line 33588, "Vcl.ComCtrls.pas" + 6) + $4
[50DF7EC6]{vcl270.bpl  } Vcl.Themes.TStyleHook.HandleMessage (Line 7110, "Vcl.Themes.pas" + 20) + $6
[50F4F3BE]{vcl270.bpl  } Vcl.Styles.TStyleEngine.HandleMessage (Line 3598, "Vcl.Styles.pas" + 22) + $B
[50DF4E24]{vcl270.bpl  } Vcl.Themes.TStyleManager.HandleMessage (Line 5665, "Vcl.Themes.pas" + 11) + $11
[50CFA393]{vcl270.bpl  } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9344, "Vcl.Controls.pas" + 0) + $F
[50CFC0C7]{vcl270.bpl  } Vcl.Controls.TWinControl.WndProc (Line 10424, "Vcl.Controls.pas" + 169) + $6
[50D7EFFE]{vcl270.bpl  } Vcl.ComCtrls.TToolBar.WndProc (Line 24912, "Vcl.ComCtrls.pas" + 104) + $6
[2108056A]{designide270.bpl} DeskUtil.SetFocusHook (Line 473, "DeskUtil.pas" + 4) + $C
[50CFB614]{vcl270.bpl  } Vcl.Controls.TWinControl.MainWndProc (Line 10113, "Vcl.Controls.pas" + 3) + $6
[501826A4]{rtl270.bpl  } System.Classes.StdWndProc (Line 18175, "System.Classes.pas" + 😎 + $0
[218D5B3F]{vclactnband270.bpl} Vcl.ActnMenus.CallWindowHook (Line 762, "Vcl.ActnMenus.pas" + 20) + $F
[50CFEBA9]{vcl270.bpl  } Vcl.Controls.TWinControl.SetBounds (Line 12187, "Vcl.Controls.pas" + 5) + $15
[50DF88A0]{vcl270.bpl  } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7505, "Vcl.Themes.pas" + 0) + $0
[50D8EB16]{vcl270.bpl  } Vcl.ComCtrls.TToolBarStyleHook.WndProc (Line 33588, "Vcl.ComCtrls.pas" + 6) + $4
[50D7C4F6]{vcl270.bpl  } Vcl.ComCtrls.TToolBar.GetButton (Line 23326, "Vcl.ComCtrls.pas" + 1) + $8
[004B8A42]{bds.exe     } AppMain.TAppBuilder.ControlBar1BandInfo (Line 5347, "AppMain.pas" + 6) + $C
[212B56D0]{vclide270.bpl} IDEDockBar.TDockToolBar.SetBounds (Line 360, "IDEDockBar.pas" + 1) + $8
[50CF5019]{vcl270.bpl  } Vcl.Controls.TControl.SetBoundsRect (Line 5972, "Vcl.Controls.pas" + 1) + $17
[50DC3699]{vcl270.bpl  } Vcl.ExtCtrls.TCustomControlBar.AlignControls (Line 7441, "Vcl.ExtCtrls.pas" + 440) + $E
[50CFA24A]{vcl270.bpl  } Vcl.Controls.TWinControl.AlignControl (Line 9292, "Vcl.Controls.pas" + 9) + $A
[50CFA6BA]{vcl270.bpl  } Vcl.Controls.TWinControl.InsertControl (Line 9451, "Vcl.Controls.pas" + 28) + $4
[50CF5758]{vcl270.bpl  } Vcl.Controls.TControl.SetParent (Line 6266, "Vcl.Controls.pas" + 9) + $4
[50D01CB9]{vcl270.bpl  } Vcl.Controls.TWinControl.SetParent (Line 13956, "Vcl.Controls.pas" + 5) + $5
[208F1D19]{coreide270.bpl} IDEServices.TIDEServices.NewToolbar (Line 4560, "IDEServices.pas" + 13) + $7
[1159BE91]{Pex104.dll  } Peganza.OtapiUtils.CreateDelphiToolbar (Line 291, "Peganza.OtapiUtils.pas" + 1) + $21
[1162B068]{Pex104.dll  } Peganza.PascalExpert.Main.TPexWizard.CreateMenus (Line 454, "Peganza.PascalExpert.Main.pas" + 81) + $F
[1162A181]{Pex104.dll  } Peganza.PascalExpert.Main.TPexWizard.DoOnTimer (Line 276, "Peganza.PascalExpert.Main.pas" + 23) + $2
[50DBA947]{vcl270.bpl  } Vcl.ExtCtrls.TTimer.Timer (Line 3193, "Vcl.ExtCtrls.pas" + 1) + $E
[50DBA827]{vcl270.bpl  } Vcl.ExtCtrls.TTimer.WndProc (Line 3151, "Vcl.ExtCtrls.pas" + 4) + $7
[501826A4]{rtl270.bpl  } System.Classes.StdWndProc (Line 18175, "System.Classes.pas" + 😎 + $0
[50E5787E]{vcl270.bpl  } Vcl.Forms.TraverseClients (Line 7789, "Vcl.Forms.pas" + 😎 + $6
[50E5C233]{vcl270.bpl  } Vcl.Forms.TApplication.ProcessMessage (Line 11028, "Vcl.Forms.pas" + 23) + $1
[50E5C276]{vcl270.bpl  } Vcl.Forms.TApplication.HandleMessage (Line 11058, "Vcl.Forms.pas" + 1) + $4
[50E5C5AD]{vcl270.bpl  } Vcl.Forms.TApplication.Run (Line 11196, "Vcl.Forms.pas" + 26) + $3
[00524DB8]{bds.exe     } bds.bds (Line 222, "" + 13) + $2
 
 

   

Share this post


Link to post

Have you download just the DLL or did you compile it from the source? Do you know if it is compatible with 10.4.2?

Okay, Looking at the support page it only supports up to 10.3 not 10.4.

image.thumb.png.956c648cc748431a1280cbfe44f0cf43.png

Edited by David Hoyle

Share this post


Link to post
8 minutes ago, David Hoyle said:

Have you download just the DLL or did you compile it from the source?

AFAIK, it doesn't come with source.

Share this post


Link to post

It is an add-on and is does not come with source. The support page is outdated. It works fine in 10.4.1 just not 10.4.2.

 

 

Share this post


Link to post

I have the same problem Access Violation ntdll.dll

Also worked fine in 10.4.1

Still works just gives violation on startup

From their blog

Pascal Analyzer, Pascal Browser and Pascal Expert support Delphi 10.4!

August 7, 2020

 

Share this post


Link to post

I was able to create a similar call stack with my CodeCoverage plugin calling INTAServices.NewToolbar. This is most likely an internal bug inside the IDE. Probably all plugins adding their own toolbar to the IDE should be affected (f.i. TMS FixInsight).

Share this post


Link to post
Guest

image.thumb.png.d39ab025b330f870a3f2fbc1afd48471.png

 

Known limitations

Top  Previous  Next

 

There are situations that Pascal Expert currently cannot handle very well. Some of these limitations, but certainly not all, are:

  1. Objects that are created through a class reference cannot always be resolved. The reason for this is that the actual class used is determined at runtime.
  2. Methods that are marked as abstract in a base class and used in that class, cannot be resolved:
    1. The actual usage of Proc is determined at runtime.
  3. Assert calls are not excluded from the parsing process, unlike in Delphi, regardless if the $C- setting is active or not. This means that identifiers used in the Assert procedure call, will be registered, and appear in the reports.
  4. The parameter P will be registered and appear in the reports. When compiled by Delphi, this code line will be stripped out if $C- is defined.

hug

Edited by Guest

Share this post


Link to post
6 minutes ago, Uwe Raabe said:

I was able to create a similar call stack with my CodeCoverage plugin calling INTAServices.NewToolbar. This is most likely an internal bug inside the IDE. Probably all plugins adding their own toolbar to the IDE should be affected (f.i. TMS FixInsight).

Thanks. I will pass this info to Peganza. At least now I know it is not something wrong on my end. 

Share this post


Link to post

As a workaround you can disable the toolbar in Pascal Expert Options. You might configure some shortcuts instead.

  • Like 1
  • Thanks 1

Share this post


Link to post
1 hour ago, Uwe Raabe said:

As a workaround you can disable the toolbar in Pascal Expert Options. You might configure some shortcuts instead.

Many thanks !!  That works perfectly. :classic_biggrin:

Share this post


Link to post

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×