data/qcsrc/menu/voret/dialog_multiplayer_demo.c

   1 #ifdef INTERFACE\r
   2 CLASS(VoretDemoBrowserTab) EXTENDS(VoretTab)\r
   3         METHOD(VoretDemoBrowserTab, fill, void(entity))\r
   4         ATTRIB(VoretDemoBrowserTab, title, string, "Demo")\r
   5         ATTRIB(VoretDemoBrowserTab, intendedWidth, float, 0.9)\r
   6         ATTRIB(VoretDemoBrowserTab, rows, float, 22)\r
   7         ATTRIB(VoretDemoBrowserTab, columns, float, 6.5)\r
   8         ATTRIB(VoretDemoBrowserTab, name, string, "DemoBroswer")        \r
   9 ENDCLASS(VoretDemoBrowserTab)\r
  10 entity makeVoretDemoBrowserTab();\r
  11 #endif\r
  12 \r
  13 #ifdef IMPLEMENTATION\r
  14 entity makeVoretDemoBrowserTab()\r
  15 {\r
  16         entity me;\r
  17         me = spawnVoretDemoBrowserTab();\r
  18         me.configureDialog(me);\r
  19         return me;\r
  20 }\r
  21 void fillVoretDemoBrowserTab(entity me)\r
  22 {\r
  23         entity e;\r
  24         entity btn;\r
  25         entity dlist;\r
  26 \r
  27         me.TR(me);\r
  28                 me.TD(me, 1, me.columns, e = makeVoretCheckBox(0, "cl_autodemo", "Record demos while playing"));\r
  29         me.TR(me);\r
  30         dlist = makeVoretDemoList();\r
  31         me.TR(me);\r
  32                 me.TD(me, 1, 0.5, e = makeVoretTextLabel(0, "Filter:"));\r
  33                 me.TD(me, 1, 0.5, btn = makeVoretButton("Clear", '0 0 0'));\r
  34                         btn.onClick = InputBox_Clear_Click;\r
  35                 me.TD(me, 1, me.columns - 1, e = makeVoretInputBox(0, string_null));\r
  36                         e.onChange = DemoList_Filter_Change;\r
  37                         e.onChangeEntity = dlist;\r
  38                         btn.onClickEntity = e;\r
  39                         dlist.controlledTextbox = e;\r
  40         me.TR(me);\r
  41                 me.TD(me, me.rows - 4, me.columns, dlist);\r
  42         me.gotoRC(me, me.rows - 1, 0);\r
  43                 me.TD(me, 1, me.columns / 2, e = makeVoretButton("Timedemo", '0 0 0'));\r
  44                         e.onClick = TimeDemo_Click;\r
  45                         e.onClickEntity = dlist;\r
  46                 me.TD(me, 1, me.columns / 2, e = makeVoretButton("Play", '0 0 0'));\r
  47                         e.onClick = StartDemo_Click;\r
  48                         e.onClickEntity = dlist;\r
  49 }\r
  50 #endif\r