hedgewars/uFLTypes.pas
branchqmlfrontend
changeset 12861 488782d9aba9
parent 12860 e33bcb9d5e9c
equal deleted inserted replaced
12860:e33bcb9d5e9c 12861:488782d9aba9
     4 
     4 
     5 const
     5 const
     6     MAXARGS = 32;
     6     MAXARGS = 32;
     7 
     7 
     8 type
     8 type
     9     TMessageType = (mtRenderingPreview, mtPreview, mtPreviewHogCount
     9     TMessageType = (mtPreview, mtPreviewHogCount
    10                     , mtToNet, mtGameFinished);
    10                     , mtToNet, mtGameFinished);
    11 
    11 
    12     TFLIBEvent = (flibGameFinished);
    12     TFLIBEvent = (flibGameFinished);
    13 
    13 
    14     TClientFlag = (cfReady, cfRegistered, cfInRoom, cfContributor, cfInGame, cfRoomAdmin, cfServerAdmin);
    14     TClientFlag = (cfReady, cfRegistered, cfInRoom, cfContributor, cfInGame, cfRoomAdmin, cfServerAdmin);