Dynamisch erstellte Komponenten ansprechen

[Zead]

Hallo!

In meiner Anwendung soll man beliebig viele Timages auf einem MDIChild erstellen können.
Wenn man auf diese Timages klickt soll ein OnClick Ereignis ausgelöst werden, dass auf das Timage bezogen ist, was es auslöst.
Da ich im Vorfeld nicht weiss wieviele Timages der Anwender erstellt, kann ich die Onclick Prozeduren nicht für jedes Timage schreiben. Sie müssen sich also alle eine Prozedur teilen.

Mein Problem ist nun: Wie finde ich raus, welches Timage das Onclick Ereignis ausgelöst hat?
Der Sender wird ja nur als TObject deklariert.

Jemand ne Idee bzw. ne Alternative?

[Neutral General]

Hi,

Nein alternativen hab ich nicht aber einen Vorschlag:

Delphi-Quellcode:

(Sender as TImage) // sanft
// ODER
TImage(Sender) // unsanft

Ich persönlich benutze gerne die unsanfte Methode

Gruß
Neutral General

[Zead]

Aha...das hilft mir weiter! Danke für die ultraschnelle Antwort!

[Delphi-Laie]

Entschuldigung bitte, wenn ich diese sehr alte Diskussion wieder aufwärme!

Zitat von Neutral General:

...Vorschlag:

Delphi-Quellcode:

(Sender as TImage) // sanft
// ODER
TImage(Sender) // unsanft

Ich persönlich benutze gerne die unsanfte Methode

Was meinst Du mit "sanft" und "unsanft", und warum bevorzugst Du letztere, Neutral General?

[stahli]

"(Sender as TImage)" prüft, ob der Typ passt und gibt andernfalls einen Fehlerhinweis aus.

"TImage(Sender)" castet ohne Prüfung was zu unvorhergesehehenen Problemen führen kann (z.B. wenn Sender ein Panel ist).
Wenn sicher gestellt ist, dass der Typ passt, kommt es aber auf´s selbe raus (allerdings ist die zweite Variante geringfügig schneller).

[Delphi-Laie]

Danke!