GExperts / Bugs / #130 Assertion failure (D:\source\_sourceforge\GExperts\source\Utils\GX

manilu georian - 2019-07-16

Delphi XE7. Win7/64bit

correction: I dropped the button in a TStringGrid.

Last edit: manilu georian 2019-07-16

If you would like to refer to this comment somewhere else in this project, copy and paste the following link:

manilu georian - 2019-07-20

got few more (one every 30 minutes). this one is when I pressed save:

(0002BC2A){GExpertsRSXE7.dll} [0DF7CC2A]
[50061181]{rtl210.bpl } System.@Assert (Line 23594, "System.pas" + 2) + $D
(0002BC2A){GExpertsRSXE7.dll} [0DF7CC2A]
(0002BA97){GExpertsRSXE7.dll} [0DF7CA97]
(0002BAEB){GExpertsRSXE7.dll} [0DF7CAEB]
[0E1AECDE]{GExpertsRSXE7.dll} Unknown function at INITWIZARD0001 + $11FE4A
(00048AA9){GExpertsRSXE7.dll} [0DF99AA9]
(00047BE8){GExpertsRSXE7.dll} [0DF98BE8]
[5016D53F]{rtl210.bpl } System.Classes.TBasicAction.Update (Line 16109, "System.Classes.pas" + 3) + $7
[505AC2D1]{vcl210.bpl } Vcl.ActnList.TCustomAction.Update (Line 294, "Vcl.ActnList.pas" + 8) + $32
[5016D3FC]{rtl210.bpl } System.Classes.TBasicActionLink.Update (Line 16034, "System.Classes.pas" + 1) + $11
[505C418F]{vcl210.bpl } Vcl.Controls.TControl.InitiateAction (Line 7989, "Vcl.Controls.pas" + 0) + $B
[50711B0E]{vcl210.bpl } Vcl.Forms.TraverseClients (Line 7196, "Vcl.Forms.pas" + 6) + $4
[50711B36]{vcl210.bpl } Vcl.Forms.TraverseClients (Line 7198, "Vcl.Forms.pas" + 8) + $6
[50711BB4]{vcl210.bpl } Vcl.Forms.TCustomForm.UpdateActions (Line 7212, "Vcl.Forms.pas" + 10) + $3
[50716FA2]{vcl210.bpl } Vcl.Forms.TApplication.DoActionIdle (Line 10886, "Vcl.Forms.pas" + 5) + $4
[507170F0]{vcl210.bpl } Vcl.Forms.TApplication.Idle (Line 10933, "Vcl.Forms.pas" + 10) + $3
[507163AB]{vcl210.bpl } Vcl.Forms.TApplication.HandleMessage (Line 10382, "Vcl.Forms.pas" + 1) + $11
[507166D1]{vcl210.bpl } Vcl.Forms.TApplication.Run (Line 10520, "Vcl.Forms.pas" + 26) + $3

If you would like to refer to this comment somewhere else in this project, copy and paste the following link:

Hm, that's very odd:

function GxOtaGetFormEditorFromModule(const Module: IOTAModule): IOTAFormEditor;
var
  i: Integer;
  Editor: IOTAEditor;
  FormEditor: IOTAFormEditor;
begin
  Result := nil;
  if not Assigned(Module) then
    Exit;
  for i := 0 to Module.GetModuleFileCount-1 do
  begin
    Editor := GxOtaGetFileEditorForModule(Module, i);
    if Supports(Editor, IOTAFormEditor, FormEditor) then
    begin
      Assert(not Assigned(Result)); // <<=== this is the assertion in question
      Result := FormEditor;
      // In order to assert our assumptions that only one form
      // is ever associated with a module, do not call Break; here.
    end;
  end;
end;

So there must be more than one form editor for a given module.
Is this an FMX project? Maybe the assumption that there is only one form editor per module no longer holds true for Firemonkey.

Thomas Mueller - 2019-07-21

assigned_to: Thomas Mueller

Group: New --> Cannot_Reproduce
If you would like to refer to this comment somewhere else in this project, copy and paste the following link:

Thomas Mueller - 2019-07-21

I just tried to reproduce the problem, first with an new FMX project, then with a new VCL project. (I assume this is Delphi XE7 due to the GExperts dll name.)

I dropped a string grid on the form then dropped a button on that string grid.

Nothing happened.

I need more information.
If you have got a project which consistently produces the error, please attach it.

Otherwise I can't do anything about this.

If you would like to refer to this comment somewhere else in this project, copy and paste the following link:

manilu georian - 2019-07-23

No. It happens often but without any obvious reason. There is no way to reproduce it on demand. What I can do is to record a movie and send it to you.

Delphi XE7. Win7/64bit. VCL. My text editor is docked. The form editor is not docked.

Last edit: manilu georian 2019-07-23

If you would like to refer to this comment somewhere else in this project, copy and paste the following link:
- Thomas Mueller - 2019-07-24
  
  Does this happen with a particular project only or with several projects? If it's several, is there any relationship between these? Is this/Are these 32 bit or 64 bit VCL projects?
  
  Regarding a movie: How large would that file be? I have got a limit on the size of emails I can receive (don't know exactly which, but there is one). And I have no idea how large the attachments to a sf.net but report can get.
  
  If you would like to refer to this comment somewhere else in this project, copy and paste the following link:
  - manilu georian - 2019-08-05
    
    video available here: https://youtu.be/VYp_yGf1spg
    
    On 2019-07-24 9:46 AM, Thomas Mueller wrote:
    
    Does this happen with a particular project only or with several projects? If it's several,
    is there any relationship between these? Is this/Are these 32 bit or 64 bit VCL projects?
    
    Regarding a movie: How large would that file be? I have got a limit on the size of emails
    I can receive (don't know exactly which, but there is one). And I have no idea how large
    the attachments to a sf.net but report can get.
    
    [bugs:#130] https://sourceforge.net/p/gexperts/bugs/130/ Assertion failure
    (D:\source_sourceforge\GExperts\source\Utils\GX_OtaUtils.pas, line 821).
    
    Status: open
    Group: Cannot_Reproduce
    Created: Tue Jul 16, 2019 04:42 PM UTC by manilu georian
    Last Updated: Tue Jul 23, 2019 03:53 PM UTC
    Owner: Thomas Mueller
    
    Error Assertion failure (D:\source_sourceforge\GExperts\source\Utils\GX_OtaUtils.pas, line 821). OK Details <<
    
    (0002BC2A){GExpertsRSXE7.dll} [0DE3CC2A]
    [50061181]{rtl210.bpl } System.@Assert (Line 23594, "System.pas" + 2) + $D
    (0002BC2A){GExpertsRSXE7.dll} [0DE3CC2A]
    (0002BA97){GExpertsRSXE7.dll} [0DE3CA97]
    (0002BAEB){GExpertsRSXE7.dll} [0DE3CAEB]
    [0E06ECDE]{GExpertsRSXE7.dll} Unknown function at INITWIZARD0001 + $11FE4A
    (00048AA9){GExpertsRSXE7.dll} [0DE59AA9]
    (00047BE8){GExpertsRSXE7.dll} [0DE58BE8]
    [5016D53F]{rtl210.bpl } System.Classes.TBasicAction.Update (Line 16109,
    "System.Classes.pas" + 3) + $7
    [505AC2D1]{vcl210.bpl } Vcl.ActnList.TCustomAction.Update (Line 294, "Vcl.ActnList.pas" +
    8) + $32
    [5016D3FC]{rtl210.bpl } System.Classes.TBasicActionLink.Update (Line 16034,
    "System.Classes.pas" + 1) + $11
    [505C418F]{vcl210.bpl } Vcl.Controls.TControl.InitiateAction (Line 7989,
    "Vcl.Controls.pas" + 0) + $B
    [50711B0E]{vcl210.bpl } Vcl.Forms.TraverseClients (Line 7196, "Vcl.Forms.pas" + 6) + $4
    [50711B36]{vcl210.bpl } Vcl.Forms.TraverseClients (Line 7198, "Vcl.Forms.pas" + 8) + $6
    [50711BB4]{vcl210.bpl } Vcl.Forms.TCustomForm.UpdateActions (Line 7212, "Vcl.Forms.pas" +
    10) + $3
    [50716FA2]{vcl210.bpl } Vcl.Forms.TApplication.DoActionIdle (Line 10886, "Vcl.Forms.pas" +
    5) + $4
    [507170F0]{vcl210.bpl } Vcl.Forms.TApplication.Idle (Line 10933, "Vcl.Forms.pas" + 10) + $3
    [507163AB]{vcl210.bpl } Vcl.Forms.TApplication.HandleMessage (Line 10382, "Vcl.Forms.pas"
    + 1) + $11
    [507166D1]{vcl210.bpl } Vcl.Forms.TApplication.Run (Line 10520, "Vcl.Forms.pas" + 26) + $3
    
    Sent from sourceforge.net because you indicated interest in
    https://sourceforge.net/p/gexperts/bugs/130/
    
    To unsubscribe from further messages, please visit https://sourceforge.net/auth/subscriptions/
    
    Related
    
    Bugs: ~~#130~~
    
    alternate
    
    If you would like to refer to this comment somewhere else in this project, copy and paste the following link:

manilu georian - 2019-08-05

Hi
I sent you the link to a video.
The bug report for that video is:
(0002BC2A){GExpertsRSXE7.dll} [0D5CCC2A]
[50061181]{rtl210.bpl } System.@Assert (Line 23594, "System.pas" + 2) + $D
(0002BC2A){GExpertsRSXE7.dll} [0D5CCC2A]
(0002BA97){GExpertsRSXE7.dll} [0D5CCA97]
(0002BAEB){GExpertsRSXE7.dll} [0D5CCAEB]
[0D7FECDE]{GExpertsRSXE7.dll} Unknown function at INITWIZARD0001 + $11FE4A
(00048AA9){GExpertsRSXE7.dll} [0D5E9AA9]
(00047BE8){GExpertsRSXE7.dll} [0D5E8BE8]
[5016D53F]{rtl210.bpl } System.Classes.TBasicAction.Update (Line 16109, "System.Classes.pas" + 3) + $7
[505AC2D1]{vcl210.bpl } Vcl.ActnList.TCustomAction.Update (Line 294, "Vcl.ActnList.pas" + 8) + $32
[5016D3FC]{rtl210.bpl } System.Classes.TBasicActionLink.Update (Line 16034, "System.Classes.pas" + 1) + $11
[505C418F]{vcl210.bpl } Vcl.Controls.TControl.InitiateAction (Line 7989, "Vcl.Controls.pas" + 0) + $B
[50711B0E]{vcl210.bpl } Vcl.Forms.TraverseClients (Line 7196, "Vcl.Forms.pas" + 6) + $4
[50711B36]{vcl210.bpl } Vcl.Forms.TraverseClients (Line 7198, "Vcl.Forms.pas" + 8) + $6
[50711BB4]{vcl210.bpl } Vcl.Forms.TCustomForm.UpdateActions (Line 7212, "Vcl.Forms.pas" + 10) + $3
[50716FA2]{vcl210.bpl } Vcl.Forms.TApplication.DoActionIdle (Line 10886, "Vcl.Forms.pas" + 5) + $4
[507170F0]{vcl210.bpl } Vcl.Forms.TApplication.Idle (Line 10933, "Vcl.Forms.pas" + 10) + $3
[507163AB]{vcl210.bpl } Vcl.Forms.TApplication.HandleMessage (Line 10382, "Vcl.Forms.pas" + 1) + $11
[507166D1]{vcl210.bpl } Vcl.Forms.TApplication.Run (Line 10520, "Vcl.Forms.pas" + 26) + $3

Does this happen with a particular project only or with several projects?
With all of them

Are these 32 bit or 64 bit VCL projects?
only 32 bit. vcl

If you would like to refer to this comment somewhere else in this project, copy and paste the following link:

manilu georian - 2019-08-05

Please remember that ALMOST any action in the IDE can trigger the bug. Maybe you can introduce extra assertions in your code. And extra debugging strings/info. Maybe this will help.

If you would like to refer to this comment somewhere else in this project, copy and paste the following link:

manilu georian - 2019-08-05

hope it helps

Last edit: manilu georian 2019-08-05

If you would like to refer to this comment somewhere else in this project, copy and paste the following link:

Thomas Mueller - 2019-08-09

Unfortunately I still have no idea what can cause this problem. It has never happened to me.
If you it happens that often for you, maybe you could download the GExperts sources and run it in the debugger. That should give you a useable call stack when it happens again. (It's much easier than it sounds.)

If you would like to refer to this comment somewhere else in this project, copy and paste the following link:

Thomas Mueller - 2020-05-06

status: open --> closed-works-for-me
If you would like to refer to this comment somewhere else in this project, copy and paste the following link:

Assertion failure...

Group

Searches

Help

#130 Assertion failure (D:\source\_sourceforge\GExperts\source\Utils\GX_OtaUtils.pas, line 821).

Error

Assertion failure (D:\source_sourceforge\GExperts\source\Utils\GX_OtaUtils.pas, line 821).

OK Details <<

Related

Discussion

Related