SoloCodigo
Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: acanalis en Jueves 13 de Marzo de 2003, 16:48
-
:kiss: Me gustaría meter en un Report una imagen. Por ahora facil!!! Pero esta imagen la voy modificando dependiendo del resultado que salga. Es decir que si el archivo introducido tiene una foto de un coche rojo y ahora modifico la fono del coche con uno verde pues el crystal no la cambia y me deja la del rojo.
Como puedo hacerlo????:flower:
-
Vamos a ver:
Cuando cierras el reporte, cierras también el recordset con que has "alimentado" ese report, por ejemplo
(dbData.rs.Close)
Bueno, pues no olvides liberar la memoria, para que limpie totalmente los datos que ocupan el dataReport:
Set dbData = Nothing
en otro caso ocurren esas cosas que tu cuentas, que no se actualiza el dataReport.
Saludos.
-
:suerte: El siguiente código es el que utilizo para meter una imagen dinamica desde crystal pero no funciona al decirme que no tengo permisos y soy administrador de mi máquina.
Private Sub Report_NoData(pCancel As Boolean)
Dim objJPEG As StdPicture
Set objJPEG = LoadPicture("C:arbolpiezabmp.bmp")
Set OleLogo.FormattedPicture = objJPEG
Set objJPEG = Nothing
End Sub
-
Perdona, pero no me siento capacitado para darte solución a tu problema: lo que yo te apuntaba se refería al refresco del recordset, que puede dar problemas si no liberas la memoria; pero este tipo de instrucciones respecto a imágenes no las he usado nunca e ignoro por qué no funcionan...
Que se te solucione el tema pronto. Saludos
-
:hippi: Bueno al final lo descubrí se trata de poner el mismo código pero en un Sub diferente es decir por ejemplo:
Private sub MUESTRA_IMG
Dim objPic As StdPicture
Set objPic = LoadPicture("c:arbolpieza.jpg")
Set OLEimg.FormattedPicture = objPic 'Aqui estamos asignando la imagen
Set objPic = Nothing
CR2.r
End Sub
Después una vez lanzado el REPORT sólo tenemos de llamar a este sub y seremos más listos, más felices, más buenos y mucho más inutililes ya que somos los únicos profesionales que siempre tenemos de estudiar "Nuevas TI" y además luego no nos sirven de nada.
Que le pregunten a aquella gente que dominaba LOGO, QBasic, Novel, etc. si ahora casi ni se usan..:fire:
-
No consigo ver la diferencia entre el primer código, el que fallaba, y este nuevo.
Donde está la diferencia? porqué funciona ahora ? :question: