Difference between revisions of "TTeam.OnJoin"

From Soldat Community Wiki
Jump to: navigation, search
m (Example)
m (Example)
Line 22: Line 22:
  
 
  begin
 
  begin
   // assign OnJoinTean handler
+
   // assign OnJoinTeam handler
 
   Game.Teams[1].OnJoin := @MyOnJoinTeamHandler;
 
   Game.Teams[1].OnJoin := @MyOnJoinTeamHandler;
  

Revision as of 13:28, 26 July 2013

property OnJoin
 Access mode: RW
 Event handler type: TOnJoinTeamEvent
 Event handler declaration: procedure (Player: TPlayer; Team: TTeam);

Description

Event property called when any player leaves the server or gets kicked/banned.

Example

 procedure MyOnJoinTeamHandler(Player: TActivePlayer; Team: TTeam);
 begin
   if Team.ID = 2 then
   begin
     Player.Team := 1;
     Player.Tell('Sorry, you can''t join Bravo Team');
   end;
 end;

 // ...

 begin
   // assign OnJoinTeam handler
   Game.Teams[1].OnJoin := @MyOnJoinTeamHandler;

   // ...

   // unassign
   Game.Teams[1].OnJoin := nil;
 end;