marcocantu / objectdebugger Goto Github PK

Do you already have a version for Delphi 11 Alexandria?

I load the group, but Delphi freezes, and I have to kill the process. Do you know why it can happen?

in TCantObjDebForm.sgPropSelectCell

"EditNum.Text :=" and "EditStr.Text :=" (TEdits) has to be backed up with disabling the onchange event as it will set EditModified to true
and it allways will write back on onexit. But under fast scrolling the component could be already changed and it will try to write back into the wrong place. Mostly causing an AV.

under "tkInteger:"

        EditNum.OnChange := nil;
        try
          EditNum.Text := GetPropValAsString(CurrComp, ppInfo);
          PlaceControl(EditNum);
        finally
          EditNum.OnChange := EditChange;
        end;

and under "tkString, tkLString, tkUString, tkWString:"

      EditStr.OnChange := nil;
      try
        EditStr.Text := GetPropValAsString(CurrComp, ppInfo);
        PlaceControl(EditStr);
      finally
        EditStr.OnChange := EditChange;
      end;

(The other edit controls are fine for now, but it would be even better to introduce an "FInternalUpdating" variable and check against in the OnChange events before setting "EditModified" to true.)

Also "EditModified := False;" is not set everywhere, so it shuld be pesent only one time, right after the case block at the end of "sgPropSelectCell".

I think I have already reported this back in the G+ era.

have you please any easy manual or howto?

Thanks

Ales

above
var
CantObjectDebugger:TCantObjectDebugger;

I made a very simple project with one line ONCREATE
CantObjectDebugger:=TCantObjectDebugger.Create(Form1);
CantObjectDebugger.active:=true;

I get with D10.2.3 access violation.
I close the error and see the object. As a matter of fact, it is shown before the error than the error.
I could not pinpoint the bug although the object inspector is shown.
I got so far as UpdateCompsCombo end and no error.
The timer is OK too.
Could not find nil somewhere.
end of FormShow(Sender: TObject); no error.