有一段代码:
type
TPlayerSprite = class(TImageSprite)
private
FCounter: Integer;
FMode: Integer;
FTamaCount: Integer;
FOldTamaTime: Integer;
protected
proceduredo
Collision(Sprite: TSprite;
vardo
ne: Boolean);
override;
proceduredo
Move(MoveCount: Integer);
override;
public
constructor Create(AParent: TSprite);
override;
end;
其中proceduredo
Collision(Sprite: TSprite;
vardo
ne: Boolean);
override;
是怎么调用的?