Este problema se soluciona muy fácilmente descargando este programa (Descargar). Se instala y listo. Al ejecutar la película ahora también se muestran los subtítulos. Hay que recordar que el nombre del video y el del subtítulo deben ser iguales. Lo único que debe variar es el formato del archivo (últimos 3 caracteres que se encuentran luego del punto). Ej: “película.avi” es el video propiamente dicho, y “película.srt” sería el subtítulo.
Y una última aclaración, si por casualidad se llegan a mostrar 2 veces los subtítulos, se debe establecer la siguiente opción en el reproductor: Reproducir>Letras, títulos y subtítulos>Desactivar.
Fuente: GERONET
miércoles 6 de mayo de 2009
lunes 16 de marzo de 2009
endatos
Public Sub llenarcombo(ByRef cbLocalidad As Windows.Forms.ComboBox, ByVal query As String)
conectar()
cm.Connection = cn
cm.CommandText = query
dr = cm.ExecuteReader
If dr.HasRows Then
Do While dr.Read
cbLocalidad.Items.Add(dr.Item(1))
Loop
End If
End Sub
-----------------------------
en engocio
Public Sub llenarcombo(ByRef cblocalidad As Windows.Forms.ComboBox, ByVal query As String)
Dim consulta As String
Dim ad As New Datos.accesoDatos
consulta = "select * from clientes"
ad.llenarcombo(cblocalidad, consulta)
End Sub
-------------------------
form
evento.llenarcombo(cbLocalidad, consulta)
Public Sub llenarcombo(ByRef cbLocalidad As Windows.Forms.ComboBox, ByVal query As String)
conectar()
cm.Connection = cn
cm.CommandText = query
dr = cm.ExecuteReader
If dr.HasRows Then
Do While dr.Read
cbLocalidad.Items.Add(dr.Item(1))
Loop
End If
End Sub
-----------------------------
en engocio
Public Sub llenarcombo(ByRef cblocalidad As Windows.Forms.ComboBox, ByVal query As String)
Dim consulta As String
Dim ad As New Datos.accesoDatos
consulta = "select * from clientes"
ad.llenarcombo(cblocalidad, consulta)
End Sub
-------------------------
form
evento.llenarcombo(cbLocalidad, consulta)
ulti id
enel form
Private Sub btnnuevo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnnuevo.Click
Dim variable As Integer
Dim ds As New DataSet
ds = evento.ultimo
variable = ds.Tables(0).Rows(0).Item(0)
variable = variable + 1
Me.TextBox1.Text = variable
End Sub
---------------------
en negocio
Public Function ultimo() As DataSet
Dim ds As New DataSet
Dim clsd As New Datos.accesoDatos
Dim query As String = ""
query = "select max (id) from clientes"
ds = clsd.EjecutarQuery(query)
Return ds
End Function
Private Sub btnnuevo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnnuevo.Click
Dim variable As Integer
Dim ds As New DataSet
ds = evento.ultimo
variable = ds.Tables(0).Rows(0).Item(0)
variable = variable + 1
Me.TextBox1.Text = variable
End Sub
---------------------
en negocio
Public Function ultimo() As DataSet
Dim ds As New DataSet
Dim clsd As New Datos.accesoDatos
Dim query As String = ""
query = "select max (id) from clientes"
ds = clsd.EjecutarQuery(query)
Return ds
End Function
lunes 29 de diciembre de 2008
sábado 6 de diciembre de 2008
Seleccion de Futbol Local
Maradona dio la lista con jugadores del fútbol local llamados a entrenar bajo sus órdenes los días 15, el mismo 16 y el 17 del corriente mes.
Se trata de Agustín Orión (San Lorenzo), Mariano Andujar (Estudiantes), Marcos Angeleri (Estudiantes), Matías Caruzzo (Tigre), Juan Forlín (Boca), Gabriel Mercado (Racing), Emiliano Papa (Vélez), Cristian Villagra (River), Franco Zuculini (Racing), Hernán Bernardello (Newell's), Pablo Barrientos (San Lorenzo), Néstor Ortigoza (argentinos), Maxi Morales (Racing), Sebastián Blanco (Lanús), Daniel Montenegro (Independiente), José Sand (Lanús) y Gonzalo Bergessio (San Lorenzo).
siguen estando en los planes del entrenador los jugadores de Boca Juan Román Riquelme, Sebastián Battaglia, Rodrigo Palacio y Jesús Dátolo. Además, Juan Sebastián Verón (de Estudiantes, lesionado), Cristian Ledesma (San Lorenzo) y Diego Buonanotte (River).
Se trata de Agustín Orión (San Lorenzo), Mariano Andujar (Estudiantes), Marcos Angeleri (Estudiantes), Matías Caruzzo (Tigre), Juan Forlín (Boca), Gabriel Mercado (Racing), Emiliano Papa (Vélez), Cristian Villagra (River), Franco Zuculini (Racing), Hernán Bernardello (Newell's), Pablo Barrientos (San Lorenzo), Néstor Ortigoza (argentinos), Maxi Morales (Racing), Sebastián Blanco (Lanús), Daniel Montenegro (Independiente), José Sand (Lanús) y Gonzalo Bergessio (San Lorenzo).
siguen estando en los planes del entrenador los jugadores de Boca Juan Román Riquelme, Sebastián Battaglia, Rodrigo Palacio y Jesús Dátolo. Además, Juan Sebastián Verón (de Estudiantes, lesionado), Cristian Ledesma (San Lorenzo) y Diego Buonanotte (River).
domingo 21 de septiembre de 2008
Teclado QWERTY
El teclado QWERTY es la distribución de teclado más común. Fue diseñado y patentado por Christopher Sholes en 1868 y vendido a Remington en 1873. Su nombre proviene de las primeras seis letras de su fila superior de teclas.
El teclado QWERTY tiene versiones para diferentes lenguas. Hay países, como Alemania, que intercambian la tecla "Y" y la tecla "Z". En Francia y Bélgica hay más cambios y las primeras 6 teclas alfabéticas tienen la secuencia AZERTY. En la disposición en español se incluye la letra "Ñ".
El teclado QWERTY tiene versiones para diferentes lenguas. Hay países, como Alemania, que intercambian la tecla "Y" y la tecla "Z". En Francia y Bélgica hay más cambios y las primeras 6 teclas alfabéticas tienen la secuencia AZERTY. En la disposición en español se incluye la letra "Ñ".
sábado 16 de agosto de 2008
olímpico mejor pagado de Beijin-2008
Estos son los deportistas mejor pagados de los Juegos:
Kobe Bryant, Estados Unidos, básquetbol, 24,5 millones de euros
LeBron James, Estados Unidos, básquetbol, 23,8 millones de euros
Ronaldinho, Brasil, fútbol, 23,2 millones de euros
Roger Federer, Suiza, tenis, 22 millones de euros
Yao Ming, China, básquetbol, 17,6 millones de euros
Dwyane Wade, Estados Unidos, básquetbol, 16,9 millones de euros
Dirk Nowitzki, Alemania, básquetbol, 15,7 millones de euros
Jason Kidd, Estados Unidos, básquetbol, 12,5 millones de euros
Pau Gasol, España, básquetbol, 9,4 millones de euros
Kobe Bryant, Estados Unidos, básquetbol, 24,5 millones de euros
LeBron James, Estados Unidos, básquetbol, 23,8 millones de euros
Ronaldinho, Brasil, fútbol, 23,2 millones de euros
Roger Federer, Suiza, tenis, 22 millones de euros
Yao Ming, China, básquetbol, 17,6 millones de euros
Dwyane Wade, Estados Unidos, básquetbol, 16,9 millones de euros
Dirk Nowitzki, Alemania, básquetbol, 15,7 millones de euros
Jason Kidd, Estados Unidos, básquetbol, 12,5 millones de euros
Pau Gasol, España, básquetbol, 9,4 millones de euros
Suscribirse a:
Entradas (Atom)

