hedgewars/uFLTypes.pas
branchqmlfrontend
changeset 11423 091149424aa4
parent 11420 05cf35103206
child 11428 e045dc60c37e
equal deleted inserted replaced
11422:4815e406a760 11423: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