Gravar/Recuperar Campo Imagem no SQL Server

19/12/2005

1

Olá

Como proceder?


[]´s
Anderson


Responder

Posts

20/12/2005

Marcio.theis

Poderia ser mais explicativo ?


Responder

20/12/2005

Anddibo

[quote:a2ee1e9ab7=´/]/]@t´]Poderia ser mais explicativo ?[/quote:a2ee1e9ab7]

Sim.

É o seguinte: considere uma tabela no SQL Server com um campo para armazenar imagem do tipo IMAGE.

Como eu poderia fazer, no meu sistema (escrito em Delphi 5.0), acessando via BDE, gravar uma imagem neste campo e, posteriormente, recuperá-la do banco.

Estou tentando gravar da seguinte forma:


Query.ParamByName(´qImagem´).AsBlob := ???
Query.ExecSQL;


Comando SQL da Query:

´INSERT INTO MinhaTabela (Imagem) VALUES (:qImagem)´


[]´s
Anderson


Responder

20/12/2005

Marcio.theis

Para gravar vc pode usar:

Query.Insert;
QueryFIGURA.LoadFromFile(OpenPictureDialog.FileName);
Query.Post;


E depois para mostrar, vc pode fazer:

arq: String; \\Variável com o local on pode salvar a imagem de forma temporária

QueryFIGURA.SaveToFile(arq);\\Salva para o arquivo
Imagem.Picture.LoadFromFile(arq);\\Carrega a imagem em uma TImage
DeleteFile(arq);\\Deleta a imagem



Responder