#ifdef INTERFACE CLASS(VoretDemoBrowserTab) EXTENDS(VoretTab) METHOD(VoretDemoBrowserTab, fill, void(entity)) ATTRIB(VoretDemoBrowserTab, title, string, "Demo") ATTRIB(VoretDemoBrowserTab, intendedWidth, float, 0.9) ATTRIB(VoretDemoBrowserTab, rows, float, 22) ATTRIB(VoretDemoBrowserTab, columns, float, 6.5) ATTRIB(VoretDemoBrowserTab, name, string, "DemoBroswer") ENDCLASS(VoretDemoBrowserTab) entity makeVoretDemoBrowserTab(); #endif #ifdef IMPLEMENTATION entity makeVoretDemoBrowserTab() { entity me; me = spawnVoretDemoBrowserTab(); me.configureDialog(me); return me; } void fillVoretDemoBrowserTab(entity me) { entity e; entity btn; entity dlist; me.TR(me); me.TD(me, 1, me.columns, e = makeVoretCheckBox(0, "cl_autodemo", "Record demos while playing")); me.TR(me); dlist = makeVoretDemoList(); me.TR(me); me.TD(me, 1, 0.5, e = makeVoretTextLabel(0, "Filter:")); me.TD(me, 1, 0.5, btn = makeVoretButton("Clear", '0 0 0')); btn.onClick = InputBox_Clear_Click; me.TD(me, 1, me.columns - 1, e = makeVoretInputBox(0, string_null)); e.onChange = DemoList_Filter_Change; e.onChangeEntity = dlist; btn.onClickEntity = e; dlist.controlledTextbox = e; me.TR(me); me.TD(me, me.rows - 4, me.columns, dlist); me.gotoRC(me, me.rows - 1, 0); me.TD(me, 1, me.columns / 2, e = makeVoretButton("Timedemo", '0 0 0')); e.onClick = TimeDemo_Click; e.onClickEntity = dlist; me.TD(me, 1, me.columns / 2, e = makeVoretButton("Play", '0 0 0')); e.onClick = StartDemo_Click; e.onClickEntity = dlist; } #endif