View source for TActivePlayer.OnKitPickup

 '''''property OnKitPickup'''''
  Access mode: RW
  Event handler type: [[TOnKitPickupEvent]]
  Event handler declaration: procedure(Player: TActivePlayer; Kit: TActiveMapObject)

==Description==
Event property called whenever a player picks up a kit box. As the name suggests, it is triggered '''exclusively''' by picking up [[TActiveMapObject]] with [[TMapObject.Style|Style]] property ranging from 16 to 22:<br>

{| class="wikitable"
 ! '''Style''' || '''Description'''
 |-
 | 16 || Medical Kit
 |-
 | 17 || Grenade Kit
 |-
 | 18 || Flamer Kit
 |-
 | 19 || Predator Kit
 |-
 | 20 || Vest Kit
 |-
 | 21 || Berserker Kit
 |-
 | 22 || Cluster Kit
 |-
 |}

==Example==
Example shows kits Style whenever the event is being triggered.
<syntaxhighlight lang="pascal">
procedure Info(Player: TActivePlayer; Kit: TActiveMapObject);
begin
	Player.Tell('You triggered an OnKitPickup event! Kit''s Style is '+inttostr(Kit.Style));
end;

var 
	i: integer;

begin
	for i:=1 to 32 do
		Players[i].OnKitPickup := @Info;
end.
</syntaxhighlight>

[[Category:TActivePlayer]][[Category:Events]]