关于Socket的问题

我在服务器端的OnAccept事件里写
procedure TForm1.ServerSocketAccept(Sender: TObject;
Socket: TCustomWinSocket);
begin
IsServer := True;
Statusbar1.Panels[0].Text := 'Accept connection from:' + Socket.RemoteAddress ;
end;

为什么出现[Error] Unit1.pas(98): Undeclared identifier: 'IsServer'
请帮帮忙