Wenn du das Objekt anklicken möchtest musst du auf "MouseDown" zurückgreifen.
Dann sieht das ganze ungefähr so aus:
Delphi-Quellcode:
// Event Zuweisen
AdDraw.Window.Events.OnMouseDown:=@AdDrawMouseDown;
//Nun wird ein Event ausgelöst sobald du deine "Spielfläche" anklickst mit der Maus.
procedure TForm1.AdDrawMouseDown(Sender: TObject; Button: TAdMouseButton;
Shift: TAdShiftState; X, Y: integer);
var
c:TSprite;
begin
c:=AdSpriteEngine.GetSpriteAt(x,y);
if Assigned(c) then Showmessage('Wurde angeklickt');
end;
Dort kannst du auch Prüfen z.b. ob die Linke oder Rechte Maustaste gedrückt wird. Zum Löschen reicht in diesen Fall ein einfaches c.Dead(kein c.destroy oder free).