TImage auf TPanel, Mausereignisse abfangen?

[soeren]

Ich habe mit Delphi wenig Erfahrung und so meine Schwierigkeiten. Mein Problem: Wenn ich eine eigene Komponente entwickele und ein Image auf ein Panel lege, dann weiß ich nicht, wie ich den Click und MouseDown an das Panel weiterleiten soll. Wenn der Benutzer auf die Komponente klickt, klickt er ja nicht auf das Panel sondern das Image. Wenn ich jetzt für die Komponente die procedure MouseDown überschreibe, dann wird diese procedure nie aufgerufen.
Ich kann zwar im 'CreateWnd' die Anweiseung geben: FImage.OnMouseDown:= OnMouseDown; aber das wirkt sich scheinbar nur auf die vom Benutzer neu geschriebenen OnMouseDown proceduren aus. Nicht aber auf die überschriebenen proceduren der Komponente.

Würde mich über Antworten freuen. Möglichst so deutlich antworten, daß ein Anfänger das versteht.
Danke! :stupid:

[himitsu]

in den Komponenten TPanel und TImage gibt es eine Function, welche die KoOrdinaten umrechnet,

oder du rechnest selber und leitest dann die neuen Koordinaten an's Panel weiter du leitest einfach im OnClick des Images die P

Delphi-Quellcode:

Procedure Form1.ImageOnKlick(Sender; X, Y);
  Begin
    PanelOnClick(Sender, X + Image.Left, Y + Image.Top);
  End;

(das ist nur ein Beispiel, also Namen... müssen noch an dein Programm angepasst wergen)

Aber vom Speicher her wäre es besser, wenn du kein Image verwendest, sondern das Bild im OnPaint-Ereignis der Panels selber (über Panel.Canvas.Draw, oder ähnliches) reinzeichnest und dann gehen sogar alle Klicks gleich ans Panel ;)


[add]
Ach ja ... Herzlich Willkommen bei uns :hi:

[soeren]

Danke für die schnelle Antwort - werde ich ausprobieren. Aber eins verstehe ich nicht: Du schreibst, daß ich Panel.canvas etc... benutzen soll. Nur wie komme ich an das Canvas vom Panel? Wenn ich Panel. aufrufe, dann erscheint in der Hilfe allenfalls eine Eigenschaft 'color', aber kein Canvas auf dem ich ein Bitmap oder ähnliches zeichnen könnte. :roll:

[himitsu]

Also eigenlich müßte ein TPanel auch ein Canvas haben, so als graphisches Objekt ... vieleicht ist es ja irgendwo untergeordnet (was ich aber nicht glaube) ... schau am Besten mal in die OH :gruebel:

[teebee]

Wenn Du eine eigene Komponente von T(Custom)Panel ableitest, brauchst Du bloss die Eigenschaft Canvas als public zu deklarieren. Sie ist nämlich bereits da, allerdings protected.

Gruß, teebee