Forums:
Amigos:
He estado creando una pequeña GUI para ecasound, despues de aprender un poquito de Gambas (solo he trabajado con vfp) la he realizado, he probado y todo bien, he aqui el detalle, todo el proceso de desarrollo lo he estado realizando desde mi pc con winxp mediante putty y vnc debido a que no dispongo en mi pc de linux ni la tarjeta de sonido multicanal que requiero para esto, pero cuando voy al equipo y ejecuto el programa me sale este mensaje:
X Error: BadDevice, invalid or uninitialized input device 166
Major opcode: 144
Minor opcode: 3
Resource id: 0x0
Failed to open device
X Error: BadDevice, invalid or uninitialized input device 166
Major opcode: 144
Minor opcode: 3
Resource id: 0x0
Failed to open device
ScimInputContextPlugin()
Cuando lo ejecuto desde mi winxp no sale, no se si por ahi este el problema, pero es un inicio para encontrar el error.
Alguien tiene una idea?.
Muchas gracias a todos por su colaboración.
Luis
Pero el problema es con
Pero el problema es con Gambas, con la aplicación que estás desarrollando o con las X en tu equipo???
Podrías dar más detalle o explicar mejor el asunto; o postear la sección de código de tu programa que provoca el error de ser así? :?
Antes fueron los dinosaurios los que se extinguieron, ahora le está llegando la hora a Micro$oft
Gabriel Eduardo Morejón López. [email]gabrielmorejon@gmail.com[/email] [img]http://counter.li.org/cgi-bin/certificate.cgi/378903
Las X solucionado, Gambas no
El error "X Error: BadDevice, invalid or uninitialized input device 166" lo pude solucionar comentando los "Section "InputDevice" del Driver "wacom" de xorg.conf
Pero sigo con el mismo problema, tengo una pequeña aplicación hecha en Gambas, solo funciona si la ejecuto remotamente desde otro pc (con vnc), pero si la ejecuto en el mismo pc no funciona.
El codigo es el siguiente:
**************
' Gambas class file
PRIVATE $hProcess AS Process
PUBLIC SUB form_open()
txtPath.Text = system.Home & "/Radio/"
END
PUBLIC SUB Button1_Click() 'Boton de iniciar captura
DIM stCadena AS String
DIM stRadio AS String
DIM stFecha AS String
DIM stHora AS String
DIM stCarpet AS String
stCadena = ""
stRadio = ""
stFecha = Str(Year(Now)) & "-" & IIf(Month(Now) > 9,Str(Month(Now)),"0" & Str(Month(Now))) & "-" & IIf(Day(Now) > 9,Str(Day(Now)),"0" & Str(Day(Now)))
stHora = IIf(Hour(Now) > 9,Str(Hour(Now)),"0" & Str(Minute(Now))) & IIf(Minute(Now) > 9,Str(Minute(Now)),"0" & Str(Minute(Now))) & IIf(Second(Now) > 9,Str(Second(Now)),"0" & Str(Second(Now)))
stCarpet = txtPath.Text
IF nomradio.Text = "" THEN
Message.Info ("No ha ingresado el nombre de la radio","Ok")
nomradio.SetFocus
RETURN
ELSE
stRadio = stCarpet & stFecha & "_" & UCase$(nomradio.text) & "_" & stHora & ".mp3 "
stCadena = stCadena & "-a:1 -erc:1,1 -erc:1,2 -i:alsa -o:" & stRadio
ENDIF
EXEC [ "ecasound","-c", "-i:alsa" ] FOR READ WRITE AS $hProcess
PRINT #$hProcess, stCadena 'En esta linea sale el mensaje Tuberia Rota'
PRINT #$hProcess, "t"
button1.Enabled = FALSE 'Desactivo el boton Grabar
button2.Enabled = TRUE 'Activo el boton Detener
END
PUBLIC SUB Button2_Click() 'Boton Detener
PRINT #$hProcess, "s" 'Envio al process el comando "s" para detener la grabacion
PRINT #$hProcess, "q" 'Envio al process el comando "q" para salir de la sesion de ecasound
button1.Enabled = TRUE 'Activo el boton Grabar
button2.Enabled = FALSE 'Desactivo el boton Detener
END
PUBLIC SUB Button3_Click() 'Boton Salir
QUIT
END
PUBLIC SUB Button4_Click() 'Boton Examinar para seleccionar la carpeta de destino
Dialog.Title = "Seleccione la Carpeta de Grabación"
Dialog.Path = txtPath.Text
IF Dialog.SelectDirectory() THEN RETURN
txtPath.Text = Dialog.Path
END
***************
La pregunta es por qué me sale tuberia rota cuando ejecuto el programa en la misma pc (no graba nada), pero no me sale ningun mensaje cuando lo ejecuto remotamente via vnc y si me graba sin problemas el ecasound.
Saludos y muchas gracias por la atención.
Luis
Al parecer el problema esta
Al parecer el problema esta en estas lineas
EXEC [ "ecasound","-c", "-i:alsa" ] FOR READ WRITE AS $hProcess
PRINT #$hProcess, stCadena 'En esta linea sale el mensaje Tuberia Rota'
PRINT #$hProcess, "t"
Creo que el process $hProcess como que se destruyera inmediatamente.
Alguna idea?
Si funciona en otra maquina
Amigos,
Acabo de probar mi aplicación en otra maquina (kubuntu 6.06 igual que la otra) y el programa funciona, solo en la otra no quiere funcionar, pero si funciona remotamente.
No se que hacer, hasta estoy pensando reinstalar kubuntu.
Saludos.
Luis
Probando desde la terminal
Probando desde la terminal al aplicación si funciona, inclusive si en las opciones del lanzador activo la casilla "Ejecutar en terminal" tambien funciona, parece ser que solo funciona asi, por lo menos ya lo tengo funcionando, si alguien conoce como solucionar el problema se lo agradeceria.
Saludos.