hedgewars/uFLTypes.pas
branchqmlfrontend
changeset 11418 091149424aa4
parent 11415 05cf35103206
child 11423 e045dc60c37e
equal deleted inserted replaced
11417:4815e406a760 11418:091149424aa4
     2 interface
     2 interface
     3 
     3 
     4 type
     4 type
     5     TMessageType = (mtPreview, mtAddPlayingTeam, mtRemovePlayingTeam, mtAddTeam, mtRemoveTeam
     5     TMessageType = (mtPreview, mtAddPlayingTeam, mtRemovePlayingTeam, mtAddTeam, mtRemoveTeam
     6                     , mtTeamColor, mtNetData, mtConnected, mtDisconnected, mtAddLobbyClient
     6                     , mtTeamColor, mtNetData, mtConnected, mtDisconnected, mtAddLobbyClient
     7                     , mtRemoveLobbyClient, mtLobbyChatLine);
     7                     , mtRemoveLobbyClient, mtLobbyChatLine, mtAddRoom, mtUpdateRoom
       
     8                     , mtRemoveRoom);
     8 
     9 
     9     TIPCMessage = record
    10     TIPCMessage = record
    10                    str: shortstring;
    11                    str: shortstring;
    11                    len: Longword;
    12                    len: Longword;
    12                    buf: Pointer
    13                    buf: Pointer