Crystal con imagenes.
Necesito agregar a un informe en crystal report una imagen, el problema es que esta no esta en una base de datos, sino en un directorio del disco rígido, lo que yo quiero es poder elegir desde el programa de visual basic 6.0 que imagen quiero que cargue el informe, es decir, quiero indicar el path del archivo de imagen. Cualqier ayuda será bienvenida.
1.Tienes que guardar las imagenes en una ase de datos por ejmplo access como objetos OLE.
2.Utilizando un control data puedes guardarlas desde visual basic. Yo he proado con imagenes .bmp y se ven bien en crystal. Te mando este código:
Private Sub Boton1_Click()
'utilizo un control data
Data1.Recordset.AddNew
Data1.Recordset("Nombre") = Text1
'el control image1 debe tener asociado el data1
Data1.Recordset("foto") = Image1.DataSource
Data1.Recordset.Update
End Sub
Private Sub Command1_Click()
CD1.Filter = "archivos (*.bmp)|*.bmp"
CD1.ShowOpen
Image1.Picture = LoadPicture(CD1.FileName)
'Picture1.Picture = LoadPicture(CD1.FileName)
End Sub
2.Utilizando un control data puedes guardarlas desde visual basic. Yo he proado con imagenes .bmp y se ven bien en crystal. Te mando este código:
Private Sub Boton1_Click()
'utilizo un control data
Data1.Recordset.AddNew
Data1.Recordset("Nombre") = Text1
'el control image1 debe tener asociado el data1
Data1.Recordset("foto") = Image1.DataSource
Data1.Recordset.Update
End Sub
Private Sub Command1_Click()
CD1.Filter = "archivos (*.bmp)|*.bmp"
CD1.ShowOpen
Image1.Picture = LoadPicture(CD1.FileName)
'Picture1.Picture = LoadPicture(CD1.FileName)
End Sub
