Como gravar JPG ou GIF em tabelas Access?

Delphi

23/12/2004

Como gravar JPG ou GIF em tabelas Access?
uso componente Ado NO DELPHI.

Grato, Adriano


Xadriano

Xadriano

Curtidas 0

Respostas

Walfrido

Walfrido

23/12/2004

essa pergunta já foi respondida no forum, mas tudo bem posso ajudar novamente.


acrescente nas Uses JPeg, ClipBrd

ai no botão que vai inserir a imagem faça assim

var
imagem : tPicture;
begin
if OpenPictureDialog1.execute then
begin
imagem := tPicture.create();
imagem.LoadFromFile(OpenPictureDialog1.FileName);
clipboard.Assign(imagem);
DBImage1.PasteFromClipboard;
imagem.Free;
end;
end;

: o DBImage1 deve estar ligado no campo que corresponde a imagem.

Walfrido


GOSTEI 0
POSTAR