Ich dachte zunächst, man kann einfach eine Shape drüberlgen, aber die gibt ebenfalls die Koordinaten, die ausserhalb des Kreises liegen zurück.
Deshalb wirst du m.E. wohl rechnen müssen. Wobei das sehr simpel ist, da du ja alle Koordinaten hast, die du benötigst und es relativ simpel ist zu checken ob diese innerhalb des Kreises liegen.
So mach ich das
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8:
| xa := x - xMittelpunkt; ya := y - xMittelpunkt; xa2 := xa*xa; ya2 := ya*ya; xy := ya2+xa2; d := sqrt(xy); if d < radius then Innerhalb := true; |
Das kannst du noch zusammenfassen, wenn du magst. xMittelpunkt ist der Mittelpunkt deines Kreises auf dem TImage. x und y sind die Koordinaten die du von Mousedown erhälst. Wenn d < des Radius deines Kreises ist, dann ist der Klick innerhalb des Kreises gewesen.
mfg. Joel