Das Problem ist hier :
Delphi-Quellcode:
getCursorPos(point);
PopupMenu1.Popup(point.X,point.Y);
der Code ruft sowohl die Popupmenu von shape als auch von image auf
Ein Shape hat leider in
OI die Ereignis "PopUpmenu" nicht sonst habe ich das Problem nicht
In
OI hat TShape nur Onmouseup, ,-down, -Move. alles in Ordnung.
gibt es keine andere Möglichkeit um die Popupmenu von TShape aufzurufen außer :
getCursorPos(point);
PopupMenu1.Popup(point.X,point.Y);
_