Imagens no Sql Server 2000

Delphi

12/03/2012

Boa tarde a todos.
Trabalho com SQL Server 2000 e criei um campo do tipo blob e uso este comamando:

if OpenPictureDialog1.Execute then
if OpenPictureDialog1.FileName <> then
begin
cldsCadFotoImovelDSC_CAMINHO_FOTO_IMOVEL.AsString := OpenPictureDialog1.FileName;
DBImage1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;

A imagem é trazida para o componente dbimage, porém não grava no banco.

Se uso o comando cldsCadFotoImovelFOTO_IMOVEL.LoadFromFile(OpenPictureDialog1.FileName) dá o seguinte erro:
Bitmap image is not valid.

Trabalho com Delphi 2009

Por gentileza se puderem ajudar, fico grato.

Atenciosamente,
Márcio

Márcio Oliveira

Márcio Oliveira

Curtidas 0

Respostas

Leonardo Xavier

Leonardo Xavier

12/03/2012

tene assim

cldsCadFotoImovelFOTO_IMOVEL.LoadFromFile(FileName);
GOSTEI 0
POSTAR