Hola foro, alguien sabe como cargar en un columna de un listbox imagenes de una base de datos mysql , no logro hacerlo funcionar
dim sql as String
if column = 0 then
sql=“SELECT * FROM lista WHERE cui=’” + variable_cuit +"’ and promo=1"
Dim data As RecordSet
data = app.mDB.SQLSelect(sql)
//CARGAR IMAGEN
if row < me.ListCount then
If data <> Nil Then
Dim a as string = Decodebase64(data.Field("imagen").StringValue)
While Not data.EOF
me.RowPicture(row) = Picture.FromData(a)
data.MoveNext
Wend
data.Close
End if
end if
end if
pero no paso mas de ahi…saludos
El cdigo no funciona de esa manera. Dnde se encuentra:
en un botn (no)
Menultem en un (no)
en un cuadro de lista (que Evento)
?
se encuentra en un evento cellbackgrounpaint de un listbox
OK. Voy a comprobar y darle una respuesta ms tarde en la maana (9:30 am aqu en Francia).
Extrao lugar para hacer esto.
Voy a verte ahora y mantenerse informado.
Hola Emile hay otra forma de hacerlo que no sea por evento cellbackground? saludos
hay otra forma de hacerlo que no sea por evento cellbackground?
PushButton ? MenuHandler (Open) ?
No he logrado establecer el campo Blob (imagen) utilizando el cdigo de referencia del lenguaje.
Lo siento.
Pero contino.
Echa un vistazo aqu.
Sigo (necesito para grabar una imagen y leerlo en una base de datos) …
Debe escribir la inversa de:
row.BlobColumn(“Logo”) = Canvas1.Backdrop.GetData(Picture.FormatPNG)
Esto es lo que me pasa, espero que puedas darte una idea del problema que tengo