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
Paren...WAIT !!!
Foro: Aplicaciones/Fragmentos de CódigoÚltimo mensaje por: guizans, 25-08-2025, 14:49
Respuestas: 3 - Vistas: 372
Gambas y Wayland
Foro: GeneralÚltimo mensaje por: guizans, 20-08-2025, 13:56
Respuestas: 6 - Vistas: 509
Odio a gb.Report
Foro: GeneralÚltimo mensaje por: guizans, 19-08-2025, 10:40
Respuestas: 8 - Vistas: 874
Devorado por la malvada s...
Foro: PythonÚltimo mensaje por: tercoide, 12-08-2025, 23:58
Respuestas: 6 - Vistas: 653