Gravar imagem no Interbase

Question

Estou precisando gravar imagem no Banco Interbase mas n�o consegui. Criei um campo tipo BLOB e estou usando o componente DBImage. quando vou dar um ApplyUpdates n�o retorna erro mas no Banco o campo fica (NULL) como se n�o tivesse nenhuma imagem. O que pode ter dado errado?

Edilcimar · Answer

mostre o codigo de grava��o do campo, pois provavelmente a� est� o erro...

Seu_madruga · Answer

Bem, teoricamente n�o tem nenhuma anormalidade, Eu tenho um DBImage lincado com um DataSource que liga a Tabela. Este DBImage eu seleciono o campo FOTO que � do tipo BLOB. No bot�o gravar eu dou um POST depois um APPLYUPDATES. N�o nenhum erro, os outros registro gravam, string, integer mas a imgaem em si n�o grava. Ao verificar no Banco se tem alguma coisa, o campo foto est� como NULL.

PS: Agora n�o tenho o fonte mas se preferir assim que tiver eu posto aqui blz.
Valew

Edilcimar · Answer

qual o c�digo de grava��o do campo, est� utilizando assign?...

Kotho · Answer

Se n�o me engano, tem um subtipo espec�fico de blob para gravar imagem.... qual o subtipo que voc� criou o campo......

Aroldo Zanela · Answer

Colega,Use LoadFromFile do objeto TField para carregar imagens (ou outros arquivos) para campos BLOBs. Basta uma �nica linha de c�digo.//forum.clubedelphi.net/viewtopic.php?t=60817&highlight=pdf...

Seu_madruga · Answer

N�o, o componente DBImage � est�tico por isso n�o trato assign nele. Eu consigo carregar uma imagem nele usando um OpenDialog. A imagem carrega perfeitamente no DBImage, depois s� confirmo a inclus�o. Pelo que eu saiba os componentes DB, edits, memos,... funcionam autom�ticos, � s� eu preencher eles com alguma coisa e dar um Apply que eles j� s�o gravados, o mesmo penso que funciona o DBImage.

Aroldo Zanela · Answer

[quote:f1c5d7889f=�Kotho�]Se n�o me engano, tem um subtipo espec�fico de blob para gravar imagem.... qual o subtipo que voc� criou o campo...[/quote:f1c5d7889f]Colega,Eu uso: BLOB SUB_TYPE 0 SEGMENT SIZE 4096...

Seu_madruga · Answer

Bem, aqui eu criei o campo como somente BLOB e o banco automaticamnete coloca do tipo BLOB SUB_TYPE 0 SEGMENT SIZE 80, ser� que pode ser isso, a tamanho era muito pesqueno pra imagem? Mas talvez era para aparecer algo no Banco e n�o (NULL) certo?

Wly · Answer

Cara,� o seguinte, passei por este problema tamb�m e percebi que o problema � que o IB s� aceita BMP e n�o JPEG, fiz o teste de gravar com o JPEG n�o d� erro porem o campo fica NULL. fiz o mesmo teste com BMP e funcionou muito bem, Ok !!!Fa�a esse teste, depois me diga se funcionou, Ok !!!...

Tchelllo · Answer

Caro amigo wly...O Interbase/Firebird aceitam imagens JPG sim, se vc usa uma Query, digite essa linha de comando para grava��o:(qryCadastro.FieldByName(�arq_blob�) as TBlobField).LoadFromFile(NomeArquivo+�.JPG�);ou se est� usando uma TTable:(tbCadastro.FieldByName(�arq_blob�) as TBlobField).LoadFromFile(NomeArquivo+�.PDF�);tamb�m poderia faze-lo utilizando um OpenPictureDialog...alterando a passagem...(qryCadastro.FieldByName(�arq_blob�) as TBlobField).LoadFromFile(OpenPictureDialog.FileName);Onde: tbCadastro -> Nome do objeto da classe TIBQuery, TADTable etc; qryCadastro -> Nome do objeto da classe TIBQuery, TADOQuery etc;arq_blob -> nome da coluna no banco (BLOB - SubType 2) ;NomeArquivo -> Caminho e nome do arquivo;At� mais!...

F�rum Gravar imagem no Interbase #275613