ActiveDelphi

[afantonio1]

Pessoal é o meu primeiro artigo aqui, estou com um pequeno problema em sistema que estou desenvolvendo aqui.
Tenho um banco de dados SQL server 2008 e preciso salvar imagens, para estou salvando apenas o caminho no banco e está tudo ok, está salvando o caminho, mas quando estou navegando no dbgrid, as imagens não mudam, carrega sempre a imagem do primeiro registro. abaixo o código

procedure TForm1.btnFotoClick(Sender: TObject);
begin
if foto.Execute then
begin
imagem.Picture.LoadFromFile(foto.FileName);
ADOQuery1.Edit;
ADOQuery1foto.Value:=foto.FileName;
end;
end;

[johnny-walker]

Vc carrega o stream e converte para imagem amigo, aqui no fórum tem exemplos, procure por cantu que vc acha, postei algo a respeito dele...

bye
_________________
P.O.W.E.R B.Y D.E.L.P.H.I

[imex]

Acredito que este código que você postou é utilizado para carregar o caminho do arquivo no campo, e também para exibição do arquivo selecionado.
Para exibir a imagem ao navegar pelo DBGrid experimente utilizar o código que segue no evento AfterScroll de ADOQuery1 mais ou menos:

[afantonio1]

Valeu cara (Imex) deu certo, Obrigado!!!

procedure TForm1.ADOQuery1AfterScroll(DataSet: TDataSet);
begin
imagem.Picture.LoadFromFile(ADOQuery1foto.AsString);
end;

Agora só mais uma Dúvida, como faço para o componente image aceitar imagens do tipo .jpge??

obrigado pela atenção

[imex]

Experimente adicionar a unit Jpeg a clausula uses do seu Form.

Espero que ajude.

[johnny-walker]

Ele não explicou a situação que não armazena a imagem no banco, aí fica difil realmente...
Mas que bom que já resolveu.


bye
_________________
P.O.W.E.R B.Y D.E.L.P.H.I