Exception EAccessViolation?

[cugar]

Moin,
wenn ich das Prog. beende, kommt: Exception EAccessViolation.
Es ist komisch, lege ich 2 Comboboxen auf mein Panel ist alles ok, kommt eine Dritte hinzu, bekomme ich die Fehlermeldung.
Habe versucht einem Tipp zu folgen, finde Suchen/Laufzeitfehler suchen aber nicht, habe dann vom Debuger behandelt eingeschaltet und mir den CPU-Register angezeigt, immer wieder bleibt es beim call dword ptr [ecx+$00000134] zu stehen.
Wie soll ich vorgehen?? (Habe selber nichts auf NILL gestellt)


Viele Grüsse
cugar

[Bernhard Geyer]

1, Komplierst Du mit Debug-DCU's? Falls nein bekommst Du keinen VCL-Sourcecode zu sehen wenn der fehler dort liegen würde
2, Ohne Quellcode ist das alles Hellseherrei. Ich habe öfters mehr als 2 ComboBoxen auf eine Formular und keine Probleme. Als wird es höchtwahrscheinlich schon etwas mit deinem Code zu tun haben.

[cugar]

Hab nur "Behandel vom Debugger" eingeschaltet, wo finde ich "mit Debug-DCU komplieren"? (verwende Delphi Prof.2006)

[marabu]

Hallo,

du findest den Schalter (bei D7) in den Projektoptionen in der Schaltergruppe "Debuggen". Aber ich muss Bernhard beipflichten: Der Fehler ist für uns wahrscheinlich sofort zu sehen, wenn wir nur sehen könnten. Du aber wirst ihn vielleicht auch dann nicht erkennen können, wenn du mit dem Debugger in immer größere Tiefen des VCL-Codes hinabsteigst.

Kannst du nicht zumindest die relevanten Code-Teile posten, z.B. OnDestroy() deiner Form?

Freundliche Grüße

[cugar]

Danke für deine Mühe, in meiner Form gibt es nur zum Schluß diese Procedute:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose:=False;
if MessageDlg('Anwendung beenden?',mtConfirmation, [mbYes,mbNo],0) = mrYes then begin
ActionDBaseDeaktiv;
TimerDatumZeit.Enabled:=False;
CanClose:=True;
end;
end;
Er bearbeitet alles ohne Probleme, dann kommt die Fehlermeldung.

[zecke]

Zitat:

if MessageDlg('Anwendung beenden?',mtConfirmation, [mbYes,mbNo],0) = mrYes then begin

mrYes = mbYes oder nicht?

[SubData]

mbYes ist für den Button, mrYes für den Result

[cugar]

Richtig,
auch wenn ich diese Procedure auslasse und schreibe: Application.Terminate gibt es die Fehlermeldung, habe ich event. mein Formular überladen, dh. zu viele Panels und Co. ???

[marabu]

Nein, dass mag ich nicht glauben. Solche Probleme gab es mal unter Delphi 1, aber das ist lange her. Beim Beenden deines Programms laufen eine Vielzahl von Routinen ab, die stellenweise auch wieder auf Code zurückgreifen, welchen du selbst bereit gestellt hast. Ich würde einen BreakPoint im Event-Handler für OnCloseQuery() setzen und dann mit F7/F8 die eigenen Programmzeilen durchgehen. Auch würde ich prüfen, ob die Fehlersituation ausbleibt, wenn ich das Programm nach dem Start sofort wieder beende. Vielleicht kannst du größere Teile deines Codes auf Kommentar setzen und so die Stelle einkreisen, in welcher der Fehler vorbereitet wird. Wenn dein Projekt portabel ist, dann kannst du es auch anhängen.

Freundliche Grüße

[cugar]

Mit F7 hab ich schon versucht, ohne Probleme, er geht Zeile für Zeile ab, dann zum Schluß Sprung zum Manager.RUN (Projekt-Datei) und dann die Fehlermeldung.
Benutze paar Komponenten von PDJ-Tools, Edit-Felder usw. ob die event. unsauber programmiert wurden?
Es ist mir aufgefallen, das der Rechner langsam wird wenn ich das Programm laufen lasse, z.B. comboboxen brauchen etwas länger bevor sie die Listen zeigen.