Changeset 447 for trunk/Network
- Timestamp:
- May 19, 2022, 10:39:34 PM (3 years ago)
- Location:
- trunk/Network
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Network/UNetworkClient.pas
r423 r447 176 176 end. 177 177 178 -
trunk/Network/UNetworkCommon.pas
r423 r447 44 44 end. 45 45 46 -
trunk/Network/UNetworkServer.pas
r424 r447 69 69 ServerEventLoop: TEventLoop; 70 70 procedure ConnectExecute(Sender: TConnectionBasedSocket; AStream: TSocketStream); 71 procedure Client(Command: TCommand; Player: integer; var Data);71 procedure Client(Command: TCommand; Player: Integer; var Data); 72 72 public 73 73 TCPServer: TTCPServer; … … 81 81 {$ENDIF} 82 82 83 procedure Client(Command, Player: integer; var Data); stdcall;83 procedure Client(Command, Player: Integer; var Data); stdcall; 84 84 85 85 … … 91 91 {$ENDIF} 92 92 93 procedure Client(Command, Player: integer; var Data);93 procedure Client(Command, Player: Integer; var Data); 94 94 begin 95 95 {$IFDEF UNIX} … … 338 338 end. 339 339 340
Note:
See TracChangeset
for help on using the changeset viewer.