Kollisionen bei GLScene

[turboPASCAL]

Genau so ? Das kann ich an dem Stückchen Code gar nicht so sehen.

Pseudocode:

Code:

procedure TForm.Timer;
begin
  CollisionManager1.CheckCollisions;
end;

procedure TForm.CollisionManager1Collision(object1,
  object2: TGLBaseSceneObject); // hoffe mal das stimmt so
begin
   Kollision ist zwischen Object1(.Name) und Object2(.Name)
end;