Shape OnClick Event?

[rollstuhlfahrer]

Zitat:

// die Prozedur dem Event zuweisen:
fields[1,1].pic.onclick := OnImageClick; //fields ist ein zweidimensionaler Array von einem record mit der Variable pic (Timage)
//hier die fehlermeldung dieser Zeile: Undefinierter Bezeichner: 'OnImageClick'

Achtung: Du greift hier wohl von einem "normalen" Teil des Quelltextes auf einen Teil zu, der in einem Objekt liegt, heißt: Deine Prozedur, die da zuweisen will, findet die Prozedur OnImageClick nicht.

Dafür gibts 2 Lösungswege:
1) Du verschiebst den im Beitrag genannten Teil des Quelltextes in eine Prozedur von TForm1 -ODER-
2) (hierfür brauchst du ne Variable vom Typ TForm1) Du weist hier Form1.OnImageClick zu.

Bernhard