Event wird ausgelöst, weiss aber nicht wo

**Jerry**

Hallo Allerseits

Ich habe folgendes Problem:

Ich habe ein Objekt TTabsheet auf diesem Objekt ist beim OnExit ein gewisser Code programmiert.

Wie gesagt der Code ist beim OnExit.

Jetzt habe ich das Problem, dass dieser Code willkürlich ausgelöst wird, ohne mein "Verlangen". Also der Code wird bei einem anderen Objekt ausgelöst, ohne mein Wissen. Leider finde ich den Ort nicht wo das Event ausgelöst wird.

Wie kann man in Delphi herausfinden, welches Ereignis für den Aufruf einer Procedur verantwortlich ist?

Gibt es da Möglichkeiten? Vielleicht sowas wie ein Event-Monitor?

Ich habe schon mit dem Debugger gearbeitet, doch da finde ich den Auslöser nicht....

Danke für Eure Hilfe!

Liebe Grüsse Jerry

**mkinzler**

Der Parameter Sender der Event-Prozedur referenziert das aufrufende Objekt.

**Jerry**

Hallo mkinzler

Danke für Deinen Tipp, wie kann ich "sender" abragen, beim Debuggin zeigt er nichts an...

**ManuMF**

Hallo,

was heißt "nichts"?
- Kein QuickInfo
- Leeres QuickInfo
- "Sender = ()"
- "Sender = nil"

Gruß,
ManuMF

**Jerry**

nein wirklich nichts auch beim Objekt überwachen zeigt er nichts an... sorry...

http://www.meier-altnau.ch/delphi/beispiel.jpg

Danke für Deinen Input!

**ManuMF**

Hallo,

probier doch mal hinter das inherited was mit Sender reinzuschreiben (z.B. "If (Sender <> nil) then XYZ := true;") und dort den Inhalt von Sender zu prüfen.

Gruß,
ManuMF

1. Projekt->Optionen->Compilereinstellungen->Mit Debug-DCUs compilieren
2. Projekt komplett neu erzeugen
3. Brechpunkt in das OnExit

und wenn er angehalten hat, einfach den CallStack anschauen wo er herkam.

**dataspider**

Hi,

also, onExit ist in Controls definiert und wird ab TWinControl eingeführt.
Aufgerufen wird es von der Virtuellen Methode doExit, welche in der Message
procedure CMExit(var Message: TCMExit); message CM_EXIT;
aufgerufen wird.

Das Ereignis wird immer aufgerufen, wenn das Control den Focus verliert.
Vielleicht solltest du erläutern, wann du denn das Ereignis benötigst. Vielleicht gibt es ja einen anderen Weg.

Cu, Frank

[EDIT]
z.B. onChange und OnChanging der Page...

**Jerry**

Vielen Dank für Die Hilfe

es ist so wie dataspider schreibt...

http://www.meier-altnau.ch/delphi/beispiel2.jpg

Wieso, dass aber diese Procedur aufgerufen wird, weiss ich immer noch nicht. Es passiert ja gar kein Exit des Tabsheets...

Ich denke ich muss das entsprechende Ereignis wirklich irgend wo anderst einbauen.

... aber vllt. ein OnExit eines Elementes auf dem Tabsheet?

Event wird ausgelöst, weiss aber nicht wo

Event wird ausgelöst, weiss aber nicht wo

Re: Event wird ausgelöst, weiss aber nicht wo

Re: Event wird ausgelöst, weiss aber nicht wo

Re: Event wird ausgelöst, weiss aber nicht wo

Re: Event wird ausgelöst, weiss aber nicht wo

Re: Event wird ausgelöst, weiss aber nicht wo

Re: Event wird ausgelöst, weiss aber nicht wo

Re: Event wird ausgelöst, weiss aber nicht wo

Re: Event wird ausgelöst, weiss aber nicht wo

Re: Event wird ausgelöst, weiss aber nicht wo

Forumregeln

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.851 Beiträge Delphi 11 Alexandria	#2 Re: Event wird ausgelöst, weiss aber nicht wo 14. Jul 2006, 12:56 Der Parameter Sender der Event-Prozedur referenziert das aufrufende Objekt. Markus Kinzler
	Zitat

Jerry Registriert seit: 24. Feb 2005 Ort: Schweiz/Thurgau 138 Beiträge Delphi 2010 Professional	#3 Re: Event wird ausgelöst, weiss aber nicht wo 14. Jul 2006, 12:59 Hallo mkinzler Danke für Deinen Tipp, wie kann ich "sender" abragen, beim Debuggin zeigt er nichts an...
	Zitat

ManuMF Registriert seit: 11. Jul 2005 1.016 Beiträge Delphi 6 Personal	#4 Re: Event wird ausgelöst, weiss aber nicht wo 14. Jul 2006, 13:02 Hallo, was heißt "nichts"? - Kein QuickInfo - Leeres QuickInfo - "Sender = ()" - "Sender = nil" Gruß, ManuMF Gruß, ManuMF Endlich hab ich was Positives an Vista entdeckt: Das mitgelieferte Mahjongg
	Zitat

Jerry Registriert seit: 24. Feb 2005 Ort: Schweiz/Thurgau 138 Beiträge Delphi 2010 Professional	#5 Re: Event wird ausgelöst, weiss aber nicht wo 14. Jul 2006, 13:11 nein wirklich nichts auch beim Objekt überwachen zeigt er nichts an... sorry... http://www.meier-altnau.ch/delphi/beispiel.jpg Danke für Deinen Input!
	Zitat

ManuMF Registriert seit: 11. Jul 2005 1.016 Beiträge Delphi 6 Personal	#6 Re: Event wird ausgelöst, weiss aber nicht wo 14. Jul 2006, 13:14 Hallo, probier doch mal hinter das inherited was mit Sender reinzuschreiben (z.B. "If (Sender <> nil) then XYZ := true;") und dort den Inhalt von Sender zu prüfen. Gruß, ManuMF Gruß, ManuMF Endlich hab ich was Positives an Vista entdeckt: Das mitgelieferte Mahjongg
	Zitat

Muetze1 (Gast) n/a Beiträge	#7 Re: Event wird ausgelöst, weiss aber nicht wo 14. Jul 2006, 13:15 1. Projekt->Optionen->Compilereinstellungen->Mit Debug-DCUs compilieren 2. Projekt komplett neu erzeugen 3. Brechpunkt in das OnExit und wenn er angehalten hat, einfach den CallStack anschauen wo er herkam.
	Zitat

Jerry Registriert seit: 24. Feb 2005 Ort: Schweiz/Thurgau 138 Beiträge Delphi 2010 Professional	#9 Re: Event wird ausgelöst, weiss aber nicht wo 14. Jul 2006, 13:36 Vielen Dank für Die Hilfe es ist so wie dataspider schreibt... http://www.meier-altnau.ch/delphi/beispiel2.jpg Wieso, dass aber diese Procedur aufgerufen wird, weiss ich immer noch nicht. Es passiert ja gar kein Exit des Tabsheets... Ich denke ich muss das entsprechende Ereignis wirklich irgend wo anderst einbauen.
	Zitat

Muetze1 (Gast) n/a Beiträge	#10 Re: Event wird ausgelöst, weiss aber nicht wo 14. Jul 2006, 13:41 ... aber vllt. ein OnExit eines Elementes auf dem Tabsheet?
	Zitat