https://foro.gambas-es.org/viewtopic.php?f=3&t=7157&p=43123#p43123
-----------------------------------
imagomundi
Miercoles, 19 Septiembre 2018, 22:17

Re: Ver Imagen En Picturebox
-----------------------------------
Respondo a medida que avanzo con mi comprensión del problema, con este código

[code linenumbers=false syntax=gambas]
Public Sub btnSUBIRFOTO_Click()
Dim archivo As Blob

  'ME CONCETO A LA BD
  cx = Mconex.conectar()
  cx.Begin
  rs = cx.Edit("Pers_Fisicas", "ID_PERSFISICA=&1", id)
  
  If Dialog.OpenFile() Then Return
  
  rs["NOMBREFOTO"] = File.Name(Dialog.Path)
  rs["IMAGEN"] = File.Load(Dialog.Path)
  
 
   txtNOMBREFOTO.text = Str(rs["NOMBREFOTO"])
   archivo = rs["IMAGEN"]
   File.Save(Application.path &/ "imagen.tmp", archivo.Data)
   picIMAGEN.Picture = Picture.Load(Application.path &/ "imagen.tmp")
  
  rs.Update
  cx.Commit
  'Mconex.desconectar(cx)
   
  id = 0
  llenarGrid
  
   End
[/code]

Consigo el objetivo en primera instancia, es decir, veo la imagen en el picturebox, pero la pierdo al perder el foco en el registro, presupongo qu ela imagen se perdio al estar en el temporal, entonces el meollo estaría en que construya el temporal cada vez que pincho en un registro ¿es así?

Sls


