jorge trejos 02-08-2024, 01:38
Hola .. solo quería abrir un hilo y hacer una pregunta al foro, Se han imaginado una terminal con IA integrada ? Una terminal que si le preguntas .. Hey como que comando puedo saber que kernel tengo ?
Bueno tal vez no parezca mucho pero deberás que a veces vendría bien que la terminal fuera una IA.
Como puedo hacer esto en Gambas3 ? Sera posible ?
Solo era una duda que tenia y quise ponerla aquí en el foro... tal vez pase algo... uno nunca sabe.
saludos a todos bendiciones
Bueno tal vez no parezca mucho pero deberás que a veces vendría bien que la terminal fuera una IA.
Como puedo hacer esto en Gambas3 ? Sera posible ?
Solo era una duda que tenia y quise ponerla aquí en el foro... tal vez pase algo... uno nunca sabe.
saludos a todos bendiciones
vuott 01-08-2024, 16:26
Solo por curiosidad, cómo el plugin "aatv" de GStreamer transforma los vídeos con los recursos del Componente gb.media:
Código:
Public Sub Main()
Dim pl As MediaPipeline
Dim src, dcb, aa, con, snk As MediaControl
Dim asrc, abin, acon, ares, asnk As MediaControl
Dim filevideo As String
Dim tm As Date
filevideo = "/ruta/del/fichero/video"
pl = New MediaPipeline
' Parte vídeo:
src = New MediaControl(pl, "filesrc")
src["location"] = filevideo
dcb = New MediaControl(pl, "decodebin")
aa = New MediaControl(pl, "aatv")
con = New MediaControl(pl, "videoconvert")
snk = New MediaControl(pl, "autovideosink")
src.LinkTo(dcb)
dcb.LinkLaterTo(aa)
aa.LinkTo(con)
con.LinkTo(snk)
' Parte audio:
asrc = New MediaControl(pl, "filesrc")
asrc["location"] = filevideo
abin = New MediaControl(pl, "decodebin")
acon = New MediaControl(pl, "audioconvert")
ares = New MediaControl(pl, "audioresample")
asnk = New MediaControl(pl, "autoaudiosink")
asrc.LinkTo(abin)
abin.LinkLaterTo(acon)
acon.LinkTo(ares)
ares.LinkTo(asnk)
pl.Play
Repeat ' Mientras no se detecte la duración del vídeo, el ciclo continúa
Wait 0.01
Until pl.Duration > 0.00
Print "Duración del vídeo: "; Time(0, 0, 0, pl.Duration * 1000)
tm = Now
Repeat
Write "\r\e[0mTiempo transcurrido: \e[31m" & Str(Time(0, 0, 0, DateDiff(tm, Now, gb.Millisecond)))
Wait 0.01
Until DateDiff(tm, Now, gb.Millisecond) >= (pl.Duration * 1000)
pl.Stop
pl.Close
End
tincho 31-07-2024, 13:15
Hola
Alguien tiene algún ejemplo con el control Wizard ? (intente buscar en la granja pero esta no funciona)
Intento hacer un programa que permita crear proyectos de construcción paso a paso y creo que este control puede ser útil.
Gracias de antemano.
Alguien tiene algún ejemplo con el control Wizard ? (intente buscar en la granja pero esta no funciona)
Intento hacer un programa que permita crear proyectos de construcción paso a paso y creo que este control puede ser útil.
Gracias de antemano.
Bienvenido, Invitado
Últimos temas
Antiguo foro. ¿ Viable ?
Foro: Sobre gambas-es.orgÚltimo mensaje por: jguardon, Hace 13 minutos
Respuestas: 2 - Vistas: 33
Ver los repositorios del ...
Foro: Mundo LinuxÚltimo mensaje por: guizans, Hace 54 minutos
Respuestas: 4 - Vistas: 52
¿Cómo crear servidor FTP ...
Foro: GeneralÚltimo mensaje por: Shordi, Ayer, 12:19
Respuestas: 2 - Vistas: 64
TextEditor. Formateado. E...
Foro: GeneralÚltimo mensaje por: Shell, 21-01-2025, 14:33
Respuestas: 2 - Vistas: 46
Gambas 3.20
Foro: InstalaciónÚltimo mensaje por: Shell, 21-01-2025, 14:32
Respuestas: 11 - Vistas: 308