Listbox rowpicture

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