Unerklärliche Access Violation

[NoName1]

Hallo Delphi-Gemeinde,
ich erhalte miteinemal eine Acess Violation.
Den Rechner habe ich danach neu gestartet und das Programm erneut Compiliert.
Beim Compilieren wird kein Fehler angezeigt. Der Absturz erfolgt, wenn ich das Programm aufrufe.

Was kann kann ich unternehmen, damit alles wieder korrekt ist.

Vielen Dank für Eure Hilfen im Voraus.

[jaenicke]

Passiert der Fehler auch, wenn du das Programm aus Delphi heraus im Debugger startest? Dann solltest du auch sehen, wo der Fehler auftritt.

[Klaus01]

.. du könntest Dir MadExcept installieren, Dein Projekt damit kompilieren und laufen lassen.
MadExcept zeigt Dir in der Regel die Klasse/Methode in welcher der Fehler auftritt.

Grüße
Klaus

[NoName1]

in der Anlage der Bug-Rport von MadExccept.
Bisher konnte ich immer, wenn ein Fehler mit MadExcept angezeigt wurde, diesen auch beheben.
Aber dieses Mal stehe ich auf dem Schlauch. Wo wird der Fehler im Report angezeigt?
Bitte eine Erklärung, wäre mir und evtl. auch anderen Lesern, sicherlich hilfreich.

[Ich habe nochmals 2 Bilder angehängt. Bild-1 die MadExcept-Meldung und Bild-2 die Meldung wenn Break gewählt wird]

[jaenicke]

Die ersten Einträge im Stacktrace zeigen die Fehlerstelle, hier auch ordentlich mit Zeilennummer usw.:

Code:

01e510da +05a Loge.exe     WPViewPDF3             3559   +6 TWPViewPDF.CommandStrEx
01e50bff +043 Loge.exe     WPViewPDF3             3447   +1 TWPViewPDF.CommandGetStr
01e887cb +10f Loge.exe     formFNCPDFBearbeitung   412  +44 TfrmFNCPDFBearbeitung.wpfActionExecute

Der Fehler tritt in Unit WPViewPDF3 in Zeile 3559 auf.

Warum, kannst du am besten im Debugger prüfen. Deshalb habe ich ja gefragt, ob der Fehler dort auch auftritt.

// EDIT:
Landest du dort direkt in der CPU-Ansicht? Wird ein Stacktrace in Delphi angezeigt? Dann kannst du die CPU-Ansicht schließen und dich dort durchklicken.

[Sinspin]

Das sie aus wie ein NullPointer, also wird sicher das Objekt des TWPViewPDF den du da aufrufst, nicht initialisiert sein.

[peterbelow]

[QUOTE=NoName1;1526579]Hallo Delphi-Gemeinde,
ich erhalte miteinemal eine Acess Violation.
Den Rechner habe ich danach neu gestartet und das Programm erneut Compiliert.
Beim Compilieren wird kein Fehler angezeigt. Der Absturz erfolgt, wenn ich das Programm aufrufe.

Was kann kann ich unternehmen, damit alles wieder korrekt ist.

/QUOTE]

Das ist ziemlich eindeutig. Ein "read of address xxx" mit einer sehr niedrigen Adresse ist praktisch immer die Folge eines Fehlers im Kode, wobei eine Methode oder Property eines Objektes über eine Variable aufgerufen wird, die Nil ist anstatt eine valide Objektreferenz zu enthalten.

Ein beliebter Fehler ist hier der falsche Aufruf eines Constructors, d.h.

Delphi-Quellcode:

var 
  aObj: TSomeClass;
begin
  aObj.Create;
  aObj.DoSomething; // Boom!

anstelle von

Delphi-Quellcode:

var 
  aObj: TSomeClass;
begin
  aObj := TSomeClass.Create;
  aObj.DoSomething; // OK

[Kas Ob.]

[QUOTE=peterbelow;1526592]

Zitat:

Zitat von NoName1 (Beitrag 1526579)

Das ist ziemlich eindeutig. Ein "read of address xxx" mit einer sehr niedrigen Adresse ist praktisch immer die Folge eines Fehlers im Kode, wobei eine Methode oder Property eines Objektes über eine Variable aufgerufen wird, die Nil ist anstatt eine valide Objektreferenz zu enthalten.

Ein beliebter Fehler ist hier der falsche Aufruf eines Constructors, d.h.

Delphi-Quellcode:

var 
  aObj: TSomeClass;
begin
  aObj.Create;
  aObj.DoSomething; // Boom!

You are right here, just to point one thing the use of the above function will fail always, the OP said it fails sometimes, so this is not the exact case, also the above will have low access address (closer to 0) only when the stack was clean (zero filled).
My take here, this is a use-after-free case, and likely it was freed using FreeAndNil.

[Kas Ob.]

After thinking, i want to correct my self, the above might not always fail with an exception in fact it could run without any problem,

Delphi-Quellcode:

type
  TMyClass = class
  public
    function DoAdd(A, B: Integer): Integer;
  end;

function TMyClass.DoAdd(A, B: Integer): Integer;
begin
  Result := A + B;
end;

procedure Test1;
var
  C: TMyClass;
begin
  C := TMyClass.Create;
  try
    Writeln(C.DoAdd(5, 7));
  finally
    C.Free;
  end;
end;

procedure Test2;
var
  C: TMyClass;
begin
  //C.Create; not needed at all, with it there will be a memory leak
  Writeln(C.DoAdd(6, 9));
end;

begin
  Test1;
  //Writeln('Soemthing'); // this didn't destroy the stack on my Delphi XE8
  Test2;
  Readln;
end.

The result

Zitat:

12
15

[himitsu]

Im Create ein ShowModal?

Zitat:

Zitat von Kas Ob. (Beitrag 1526612)

Delphi-Quellcode:

  //C.Create; not needed at all, with it there will be a memory leak

Ja und NEIN.

Warum hört eigentlich niemand auf das, was ihm der Compiler an Warnungen zu Recht um die Ohren wirft?
Dieses Vorgehen klappt nur, weil innerhalb der Methode nicht auf das Objekt selbst zugegriffen wird.
Aber eine Mehtode ist gerade dafür da, dass man jenes macht ... ansonsten könnte man auch eine Klassen-Methode verwenden.


Abgesehn davon ist

Delphi-Quellcode:

C.Create;

hier sowieso komplett falscht, weil es

Delphi-Quellcode:

C := TMyClass.Create;

zu sein hat!


Und wenn eine Class-Function, dann nur über deren Klassentyp, anstatt eine uninitialisierte Variable,
denn bei einer Variable wird nötige der Klassen-Typ aus der Objektinstanz geholt, welche es hier aber nicht gibt.

Delphi-Quellcode:

type
  TMyClass = class
  public
    class function DoAdd(A, B: Integer): Integer;
  end;

procedure Test2;
begin
  Writeln(TMyClass.DoAdd(6, 9));
end;

Und ja, natürlich kann man ein

Delphi-Quellcode:

aObj.Create;

nutzen, aber nur, wenn man vorher auch den Instanzspeicher für dieses Objekt instantiiert hat.
Beispiel: siehe TApplication.CreateForm

[Kas Ob.]

Zitat:

Zitat von himitsu (Beitrag 1526614)

Zitat:

Zitat von Kas Ob. (Beitrag 1526612)

Delphi-Quellcode:

  //C.Create; not needed at all, with it there will be a memory leak

Ja und NEIN.

Warum hört eigentlich niemand auf das, was ihm der Compiler an Warnungen zu Recht um die Ohren wirft?
Dieses Vorgehen klappt nur, weil innerhalb der Methode nicht auf das Objekt selbst zugegriffen wird.
Aber eine Mehtode ist gerade dafür da, dass man jenes macht ... ansonsten könnte man auch eine Class-Methode verwenden.


Abgesehn davon ist

Delphi-Quellcode:

C.Create;

sowieso komplett falscht, weil es

Delphi-Quellcode:

C := TMyClass.Create;

zu sein hat!


Und wenn eine Class-Function, dann nur über deren Klassentyp, anstatt eine uninitialisierte Variable,
denn bei einer Variable wird nötige der Klassen-Typ aus der Objektinstanz geholt, welche es hier aber nicht gibt.

You are right.

[Kas Ob.]

I in haste tried now to produce this strange behaviour in Delphi compiler where no warning issued

Delphi-Quellcode:

type
  TMyClass = class
  private
    FInitValue: Integer;
  public
    constructor Create(InitValue: Integer); overload;
    function DoCalc(Value: Integer): Integer;
  end;

  TCont = class
  private
    FMyClass: TMyClass;
  public
    procedure Init(Value: Integer);
    procedure DeInit;
    function Calc(Value: Integer): Integer;
  end;

constructor TMyClass.Create(InitValue: Integer);
begin
  inherited Create;
  FInitValue := InitValue;
end;

function TMyClass.DoCalc(Value: Integer): Integer;
begin
  Result := Value * FInitValue;
end;

function TCont.Calc(Value: Integer): Integer;
begin
  Result := FMyClass.DoCalc(Value)
end;

procedure TCont.DeInit;
begin
  FMyClass.Free;
end;

procedure TCont.Init(Value: Integer);
begin
  FMyClass := TMyClass.Create(Value);
end;

function Test1: Integer;
var
  C: TCont;
begin
  C := TCont.Create;
  try
    C.Init(10);
    Result := C.Calc(5);
    C.DeInit;
  finally
    C.Free;
  end;
end;

function Test2: Integer;
var
  CE: TCont;
begin
  CE := @CE;
  CE.Init(11);
  Result := CE.Calc(9);
  //C.DeInit;
end;

var
  A, B: Integer;

begin
  A := Test1;
  B := Test2;
  Writeln(A);
  Writeln(B);
  Readln;
end.

In Delphi 2010 it does exit silently with no exception, while Delphi XE8 it run like with correct result, in both cases "CE := @CE" fooled the compiler, also the warning is easily can be detected by the compiler when the variable localized and stares at the compiler in the eyes, but when a function is long enough the compiler might not detect it at all.

[Sinspin]

Zitat:

Zitat von himitsu (Beitrag 1526614)

Im Create ein ShowModal?

Das haste schön bemerkt, Himitsu :thumb:

Ich finde, jemand der sowas macht, zeigt ein Level an Unfähigkeit zum Programmieren, das man ihm/ihr schon anraten sollte sich einen anderen Job zu suchen!

Andererseits, klassischer Anfängerfehler, genauso wie der Unfassbarerweise aus-dem-nichts auftauchende Nullpointer, wegen dem man gleich nen Foreneintrag aufmacht, anstatt mal das Gehirn einzuschalten!

[NoName1]

Vielen Dank an alle. Ich werde alle Ratschläge berücksichtigen.
Übrigens: Der Fehler liegt nicht in der "WPViewPDF3,".
Ich habe gestern alle Button-Zugriffe und die Actions aus dem Formular geworfen, neu Compiliert, Delphi geschlossen, den Rechner heruntergefahren.
Eine kleine Runde sparzieren gegangen, mache ich so ab und zu einmal, bis ja schließlich auch schon 73 Jahre alt.
Danach den Rechner wieder angemacht, die Button Zugriffe neu installiert, die Actions neu hinzugefügt und siehe da,
es funktioniert nun alles perfect! Weis der KuckKuck was da los war??

Einen schönen Tag noch alle Helfern!