Difference between revisions of "TActivePlayer.OnVoteKick"
(new page) |
m (→Example) |
||
| (4 intermediate revisions by 2 users not shown) | |||
| Line 5: | Line 5: | ||
==Description== | ==Description== | ||
| − | Event property called when a player hits | + | Event property called when a player hits F12 during a kick vote. F11 (No) votes are ignored. |
| − | <br> | + | <br> |
==Example== | ==Example== | ||
| − | Example makes players say "Voted!" when they hit | + | Example makes players say "Voted Yes!" when they hit F12. |
<syntaxhighlight lang="pascal"> | <syntaxhighlight lang="pascal"> | ||
| − | + | procedure OnVoteMessage(Player, Victim: TActivePlayer); | |
begin | begin | ||
| − | Player.Say('Voted!'); | + | Player.Say('Voted Yes!'); |
end; | end; | ||
Latest revision as of 23:18, 25 September 2013
property OnVoteKick Access mode: RW Event handler type: TOnVoteKickEvent Event handler declaration: procedure (Player, Victim: TActivePlayer)
Description
Event property called when a player hits F12 during a kick vote. F11 (No) votes are ignored.
Example
Example makes players say "Voted Yes!" when they hit F12.
procedure OnVoteMessage(Player, Victim: TActivePlayer);
begin
Player.Say('Voted Yes!');
end;
var
i: Byte;
begin
for i:=1 to 32 do
Players[i].OnVoteKick := @OnVoteMessage;
end.
