网络通信/分布式开发
关于Socket的问题
墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年，写一次发全网
我也要 关注 + 加入社区我在服务器端的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'
请帮帮忙
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'
请帮帮忙
...全文
