GRAVAR IMAGEM NO BANCO DE DADOS

Delphi

27/05/2009

Boa tarde,
Pessoal estou tentando gravar uma imagem no meu banco de dados oracle, so que o codigo grava, so que a imagem NÃO.
segue abaixo o codigo :

begin

ADOQuery1.Append; //-ou dataset.edit;
If OpenDialog1.Execute then
DBImage1.Picture.LoadFromFile(OpenDialog1.FileName);
ADOQuery1.FieldByName(´DFFUNCRACHA´).AsString := ´1´;
ADOQuery1.post;

end;


Evandro_araujo

Evandro_araujo

Curtidas 0

Respostas

Evandro_araujo

Evandro_araujo

27/05/2009

PESSOAL,

CONSEGUI RESOLVER

ADOQuery1.Open;
ADOQuery1.insert; //-ou dataset.edit;


If OpenPictureDialog1.Execute then
ADOQuery1ENC_BL_IMG.LoadFromFile(OpenPictureDialog1.FileName);
ADOQuery1.FieldByName(´DFFUNCRACHA´).AsString := ´1´;

ADOQuery1.post;


GOSTEI 0
POSTAR