SavePictureDialog
Bom dia,,,, to vinculando a foto de produtos ao cadastro, intaum tenho um Dbimage, 1 openpicturedialog, e 1 savepicturedialog.
No cadastro do produto consigo abrir a foto com o openpicturedialog, a foto aparece no dbimage mas pra salvar essa foto a este produto oque devo fazer, alguem sabe uma rotina no savepicturedialog para salvar,,, pois quando volto no cadastro do produto naum tem a foto ...Desde ja agradeço a ajuda...
No cadastro do produto consigo abrir a foto com o openpicturedialog, a foto aparece no dbimage mas pra salvar essa foto a este produto oque devo fazer, alguem sabe uma rotina no savepicturedialog para salvar,,, pois quando volto no cadastro do produto naum tem a foto ...Desde ja agradeço a ajuda...
Vfdelphi
Curtidas 0
Respostas
Micheus
19/08/2006
...a foto aparece no dbimage mas pra salvar essa foto a este produto oque devo fazer,...
Para armazenar a imagem eu anteiormente utilizei um campo BLOB no banco e, para ler e gravar, um TMemoryStrem como intermediários. Após ter carregado a imagem para o DBImage através do OpenPictureDialog, vc pode executar um procedimento mais ou menos assim:procedure TForm1.GravaImage(Imagem :TDBImage);
var
MemStream: TMemoryStream;
begin
MemStream := TMemoryStream.Create;
try
Imagem.Picture.Graphic.SaveToStream(MemStream);
TableName.Edit;
TableNameBlobField.LoadFromStream(MemStream);
TableName.Post;
finally
TheStream.Free;
end;
end;GOSTEI 0