Jup!
Das geht. Probleme hab ich aber keine.
Ich mach das jetzt so:
Delphi-Quellcode:
procedure TSelSprite.DoCollision(Sprite:TSprite;var done:boolean);
var mousedown:boolean;
begin
mousedown := getkeystate(VK_LBUTTON)<0;
if (sprite is TMouseCursor) and (mousedown) then
selected := true
end;
Danke!