# Gambas Form File 3.0 { Form Form MoveScaled(0,0,115,69) Icon = Picture["gato durmiendo.jpg"] Resizable = False { ToolButtonAnadir ToolButton MoveScaled(1,57,17,6) Font = Font["-2"] ToolTip = ("Añadir Situacion o Estado en el que se encuentra la clase o habitacion") AutoResize = True Text = ("Situación") Picture = Picture["icon:/32/add"] Border = True } { FrameConfiguracion Frame MoveScaled(55,1,59,62) Visible = False Text = ("CONFIGURACIÓN") { DrawingArea1 DrawingArea MoveScaled(3,8,53,3) Border = Border.Plain } { Label2 Label MoveScaled(3,4,22,3) AutoResize = True Text = ("Niveles de Ruido:") } { TabStrip1 TabStrip MoveScaled(1,27,56,34) Count = 3 Index = 0 Text = ("Medio") { CheckBoxFormularioColorMedio CheckBox MoveScaled(3,2,33,3) Text = ("Color de Fondo de la pantalla:") } { CheckBoxSonidoMedio CheckBox MoveScaled(3,11,45,3) Text = ("Emitir sonido") } { ButtonBoxSonidoMedio ButtonBox MoveScaled(6,15,42,4) Alignment = Align.Right } { CheckBoxScriptMedio CheckBox MoveScaled(3,20,45,3) Text = ("Ejecurtar un script :)") } { ButtonBoxScriptMedio ButtonBox MoveScaled(6,24,47,4) Alignment = Align.Right } { CheckBoxTextoMedio CheckBox MoveScaled(10,6,11,3) Text = ("Texto:") } { TextBoxMedio TextBox MoveScaled(23,6,30,3) } { ColorButtonMEDIO ColorButton MoveScaled(37,1,16,4) } { ToolButtonEscucharMedio ToolButton MoveScaled(49,15,4,4) Picture = Picture["icon:/16/volume"] } Index = 1 Text = ("No Admisible") { CheckBoxFormularioColorNoadmisible CheckBox MoveScaled(3,2,28,3) Text = ("Mostrar formulario color:") } { ColorButtonNoAdmisible ColorButton MoveScaled(32,1,21,4) } { TextBoxNoadmisible TextBox MoveScaled(23,6,30,3) } { CheckBoxTextoNoadmisible CheckBox MoveScaled(10,6,14,3) Text = ("Texto:") } { CheckBoxSonidoNoadmisible CheckBox MoveScaled(3,11,45,3) Text = ("Emitir sonido") } { ButtonBoxSonidoNoadmisible ButtonBox MoveScaled(6,15,43,4) Alignment = Align.Right } { ButtonBoxScriptNoadmisible ButtonBox MoveScaled(6,24,47,4) Alignment = Align.Right } { CheckBoxScriptNoadmisible CheckBox MoveScaled(3,20,45,3) Text = ("Ejecurtar un script :)") } { ToolButtonEscucharNOAdmisible ToolButton MoveScaled(50,15,4,4) Picture = Picture["icon:/16/volume"] } Index = 2 Text = ("VideoVigilancia") Picture = Picture["icon:/16/camera"] { CheckBoxActivarMotion CheckBox MoveScaled(3,2,48,3) Text = ("Activar VideoVigilancia ante movimientos") } Index = 0 } { TextLabel1 TextLabel MoveScaled(3,12,39,13) Text = ("Leyenda:
\n Verde: Valore Admisibles
\n Amarillo: Valor Medio
\n Rojo: Valor No Admisible
\n") } { ButtonGuardar Button MoveScaled(46,20,8,6) ToolTip = ("Guardar los cambios") Picture = Picture["icon:/32/save"] } { ToolButtonRefrescar ToolButton MoveScaled(48,4,5,4) Visible = False Picture = Picture["icon:/16/refresh"] } { ButtonConfigurarEscuchando Button MoveScaled(46,13,8,6) ToolTip = ("Ayuda configurar niveles") Picture = Picture["escucha.png"] } } { ButtonSalir Button MoveScaled(46,57,8,6) ToolTip = ("Salir de Aplicación") Picture = Picture["icon:/32/quit"] } { ButtonEjecutar Button MoveScaled(37,57,8,6) ToolTip = ("Ejecutar Aplicación") Picture = Picture["icon:/32/exec"] } { GridSitu GridView MoveScaled(1,1,53,55) ToolTip = ("Haga doble click para cambiar configuración") ShowCursor = True } { ToolButtonBorrado ToolButton MoveScaled(19,57,17,6) Font = Font["-2"] ToolTip = ("Borrar Situacion o Estado") AutoResize = True Text = ("Situación") Picture = Picture["icon:/32/delete"] Border = True } { TextLabel2 TextLabel MoveScaled(13,64,99,4) Font = Font["Italic,Underline,-1"] Text = ("Realizado por Julio Sánchez Berro (jsbsan.blogspot.com) Licencia GPL3. Especialmente desiñado para MiniNo PicarOS") Alignment = Align.Center Border = Border.Sunken } { ToolButtonUpdate ToolButton MoveScaled(1,64,12,4) Font = Font["-4"] ToolTip = ("comprobar versión en servidor") Text = ("Actualizar") & "..." Picture = Picture["icon:/16/internet"] Border = True } }