Campo BLOB - Mais um Problema

Firebird

07/10/2005

Boa Tarde amigos!
Gravar uma imagem diretamente no banco parece facil, mas cada hora vejo um problema diferente nos topicos e ainda nao consegui gravar minhas imagens.
Uso FB1.5, IBX, tenho uma tabela com o campo FOTO do tipo BLOB, Size80, Subtype Binary. E quando executo a simples procedure no Delphi:

procedure TForm1.Button1Click(Sender: TObject);
var Stm:TMemoryStream;
begin
stm := TMemoryStream.Create;
(Image1.Picture.Graphic as TJpegImage).SaveToStream(Stm);
qryAux.Parameters.ParamByName(´foto´).LoadFromStream(Stm,ftBlob);
qryAux.ExecSQL();
end;

Ocorre o erro: EIBClientERROR with Message ´Unspported feature´.O Codigo da qry é o seguinte:
UPDATE CONJUNTOS SET
DESCRICAO = ´Conjunto 05´,
FOTO = :foto

Uso Sistema ADO, se alguem ai conseguir me ajudar...Muito Obrigado!


Neves777

Neves777

Curtidas 0

Respostas

Afarias

Afarias

07/10/2005

Talves seja um problema no Driver ODBC/OLEDB que vc está usando, mas, não saco de ADO...

de qualquer forma, após o SaveToStream vc deveria ter a linha:

Stm.Position := 0;

antes de tentar o LoadFromStream()


T+


GOSTEI 0
Neves777

Neves777

07/10/2005

É uma pena que você Afarias nao manje de ADO, minha ultima esperança era vc, vlw a dica, mas apenas colocar Stm.Position := 0 não funcionou.
Alguem + pode ajudar :?:


GOSTEI 0
Afarias

Afarias

07/10/2005

Mas vc está usando ADO mesmo ou IBX ??

e se for ADO então qual o Driver ODBC/OleDB q está usando??!


T+


GOSTEI 0
Neves777

Neves777

07/10/2005

É sistema ADO mesmo, o driver é o ZStyle IBOLE Provider


GOSTEI 0
Afarias

Afarias

07/10/2005

Não estou certo se é por ai, mas sugiro q tente esses 2 drivers:

http://www.ibphoenix.com/main.nfs?a=ibphoenix&page=ibp_60_odbc

http://www.xtgsystems.com/download/ib6odbc.zip


T+


GOSTEI 0
POSTAR