Graphics32: onmousedown - Problem mit Layern

[TheMisch]

Hallo alle beisammen,

ich habe hier ein kleines Problem, auf das ich einfach keine Lösung finde...

Ich will im Grunde nur, dass ein TImage32 (aus Graphics32) auf ein onmousedown Event reagiert.
Die Prozedur sieht dann so aus:

Delphi-Quellcode:

procedure TImage32MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer; Layer: TCustomLayer);

Jedoch zeigt er mir ständig als Fehlermeldung "Undeclared Identifier: TCustomLayer" an. Dabei will ich nur ein gewöhnliches onmousedown Event wie bei einem normalen TImage ohne irgendwelche Layers. Hab auch gelesen, dass man das abschalten kann, aber noch nicht herausgefunden wie das gehen soll...

Kann mir da jemand helfen?

Gruß, Mich

[TheJeed]

Willkommen in der DP!

Hast Du denn GR32_Layers in der Uses-Klausel im interface-Abschnitt eingebunden? In der Unit wird TCustomLayer deklariert.

[TheMisch]

Nein, wusste nicht dass man das machen muss.
Habs aber jetzt gemacht und es geht! Danke :)

Gruß, Mich