Eingentlich ganze einfach das mit der collision:
Delphi-Quellcode:
procedure addcol(obj: tglbasesceneobject);
var
col:tglbcollision;
begin
col:=tglbcollision.Create(obj.Behaviours);
col.Manager:=FCollisionManager;// name anpassen
col.Name:='Collision';
obj.Behaviours.Add(col);
end;
end;