"José Calabuig" <vaqu...@yahoo.es> wrote in message
news:8cce01c208b1$ff816960$a4e62ecf@tkmsftngxa06...
'Private Sub Form_Current()
Dim cadImagen As String
cadImagen = "C:\Imagenes\Año2002" & "\" & Me.Num_imagen & ".tif" 'o ".jpg"
Me.Imagen.Picture = cadImatge 'Si el control Imagen que has insertado en el
form se llama "Imagen"
Me.Refresh
'End Sub
Marjan
Fabian Manassero <fmana...@barrick.com> escribió en el mensaje de noticias
OINUiNLCCHA.1696@tkmsftngp04...
No incrustes la imagen, ponla como "Linked" en Picture Type.
De esta forma tienes las imagenes por separado, pero entonces tu formulario
cuando se abra, va a buscar primero la ruta en la que originalmente estaban
las imagenes.
Saludos y espero te sirva.
Casvr
"José Calabuig" <vaqu...@yahoo.es> escribió en el mensaje
news:8cce01c208b1$ff816960$a4e62ecf@tkmsftngxa06...
WhiteWolf SW
"casvar" <cas...@xxxhotmail.com> wrote in message
news:uliPF6LCCHA.1432@tkmsftngp04...
Si tuvieras un campo de texto en la tabla con el "path" como tu llamas lo
insertas en el formulario y lo llamas por ejemplo "txtImag" (Nombre del
control)
Luego vuelves a las propiedades del control picture y borras el texto cuadro
Formato - Imagen.
Vas a la pestaña Eventos y en el evento al activar el registro copias :
'Private Sub Form_Current()
Dim txtImagen As String 'variable de texto
txtImagen = Me.txtImag 'almacenas el valor del campo...por ej.
C:\Mis Imagenes\casita.jpg
Me.ImagenX.Picture = txtImagen 'el "orígen de la imagen"
Me.Refresh
'End Sub
Incluso puedes "parametrizar" el valor "txtImagen". No te funcionarà con
formularios continuos... claro.
Marjan
"José Calabuig" <vaqu...@yahoo.es> escribió en el mensaje
news:8cce01c208b1$ff816960$a4e62ecf@tkmsftngxa06...
"WhiteWolf SW" <jor...@jeld-wen.com> wrote in message
news:u0ktajPCCHA.492@tkmsftngp02...
Saludos Viejo
WhiteWolf SW
"Fabian Manassero" <fmana...@barrick.com> wrote in message
news:eRN2bKvCCHA.1236@tkmsftngp02...