Fórum salvar imagem de um banco para outro #486538

23/07/2014

0

Boa tarde a todos,
tenho um banco de dados Firebird com cadastro de Produto, preciso enviar a foto desse banco
para um banco Mysql, estou a dias procurando algo pela internet mas até o momento não descobri nada,
se alguem de vocês já passou por isso por favor me de uma ajuda, Obrigado...
Edson Bezerra

Edson Bezerra

Responder

Posts

23/07/2014

Valquiria Silva

Edson, boa noite.

No banco Firebird qual o tipo do campo da foto, e no Mysql?

Penso que você poderia usar um TMemoryStream.
Responder

Gostei + 0

24/07/2014

Edson Bezerra

bom dia Valquiria,
o campo firebird e do tipo blob, eu tentei dessa forma.

var
S : TStream;
Imagem : TJPEGImage;
begin

if not DM.cds_ProdutoIMG_PROD.IsNull then
begin
S := DM.cds_Produto.CreateBlobStream(DM.cds_ProdutoIMG_PROD,bmread);
Imagem := TJPEGImage.Create;
Imagem.LoadFromStream(S);

if (DM_MYSQL.c_IMG.Active) then
DM_MYSQL.c_IMG.Close;
DM_MYSQL.c_IMG.Params[0].AsInteger := DM.cds_ProdutoCODPRODUTO.AsInteger;
DM_MYSQL.c_IMG.Open;
DM_MYSQL.c_IMG.Edit;

DM_MYSQL.c_IMGIMG_PROD.LoadFromStream(S);
DM_MYSQL.c_IMG.ApplyUpdates(0);
end;
end;

mas ele da erro no applyupdate, ele fala que tabela não existe, mas ela existe..

esse é o erro

First chance exception at $7616C41F. Exception class TDBXError with message 'Tabela 'mecanicaturbo02.produtos' não existe'. Process prjHexa.exe (4924)
Responder

Gostei + 0

24/07/2014

Edson Bezerra

o banco de dados mysql não é local, eu utilizo insert into, para inserir os demais campos, mas o campo blob, não da pra enviar via insert into..
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar