Source position: agraphics.pas line 2496
procedure SetCollision(
num: ULONG;
routine: tPROCEDURE;
gelsInfo: pGelsInfo
);