| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
Alpinador Lt Cmdr

Registrado: 21 Abr 2014Mensajes: 123
|
Publicado: Lun 18 Jun, 2018 2:03 pm Asunto: |
|
|
Hola Cesar...... una duda
si tengo una Tabla MySQL y un campo FOTO1 como BLOB como seria para cargar la imagen ???
esta linea no me va
| Código: | TuBase->TuTablFoto->LoadFromStream(::ImagenToStream(this->OpenPictureDialog1->FileName)); |
|
|
| Volver arriba |
|
 |
Cesar C. Salazar Gonzalez Master


Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
Publicado: Lun 18 Jun, 2018 2:55 pm Asunto: |
|
|
Hola, casi ya no entro por el foro, pero la función loadFromStream NO existe en MySQL, puedes usar el siguiente enlace de la ayuda, para determinar como cargar la imagen y posteriormente usar el procedimiento que estas mostrando.
https://dev.mysql.com/doc/refman/8.0/en/blob.html _________________
 |
|
| Volver arriba |
|
 |
Alpinador Lt Cmdr

Registrado: 21 Abr 2014Mensajes: 123
|
Publicado: Mie 19 Sep, 2018 3:15 pm Asunto: |
|
|
no ya..... me refiero que tengo la BD MySQL pero el procedimiento estoy intentandolo en C++ Builder
parece que va funcionando pero toma nota de esto...he tenido que modificar esta funcion
| Código: | TJPEGImage* __fastcall BlobToJpg(TBlobField *CampoBLOB)
{
if(!CampoBLOB->IsNull)
{
TJPEGImage *JPeg = new TJPEGImage;
TMemoryStream *StreamTmp = new TMemoryStream;
CampoBLOB->SaveToStream(StreamTmp); //sacamos el jpg y se convierte a stream
StreamTmp->Seek(0,soFromBeginning);
JPeg->LoadFromStream(StreamTmp);
return(JPeg);
}
else
return(NULL);
} |
cambiando donde ponia !CampoBLOB->Value->IsEmpty() que en RAD Studio 10.2.x ya no esta esa funcion....he probado a sustituirlo por :
| Código: | if(!CampoBLOB->IsNull) |
|
|
| Volver arriba |
|
 |
|