webrodex 0 Denunciar post Postado Janeiro 11, 2007 Paradox gravando foto e lendoE o seguinte tenho uma tabela paradox e precisava gravar as imagem dos produtos dentro do paradox e possivel ? se é como fazer e depois como chamar para fazer a leitura gravada ? Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Janeiro 11, 2007 Pode fazer algo do tipo: procedure TForm1.Button1Click(Sender: TObject);var Bmp: TBitmap;beginif OpenDialog1.Execute then begin Bmp := TBitmap.Create; try Bmp.LoadFromFile(OpenDialog1.FileName); Table1.Insert; Table1.FieldByName('Imagem').Assign(Bmp); Table1.Post; finally Bmp.Free; end; end;end;Somente o campo Imagem precisa ser do tipo GraphicsUma dica que lhe dou, cuidado com a quantidade e tamanho das fotos que vai armazenar, pois o seu BD vai crescer rápidamente, podendo ficar pesado e dificultando o trabalho... Compartilhar este post Link para o post Compartilhar em outros sites
bdexterholland 0 Denunciar post Postado Janeiro 11, 2007 a melhor dica nesse caso é fazer o campo de foto do tipo string para gravar apenas a URL da imagem e em uma pasta separada, ficar a foto... Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Janeiro 11, 2007 Outra forma que pode fazer para guardar a imagem seria: procedure TForm1.Button1Click(Sender: TObject);beginif OpenDialog1.Execute then begin Table1.Insert; Table1.FieldByName('Imagem').LoadFromFile(OpenDialog1.FileName); Table1.Post; end;end; Compartilhar este post Link para o post Compartilhar em outros sites
webrodex 0 Denunciar post Postado Janeiro 11, 2007 Valew Problema resolvido marcio !! Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Janeiro 11, 2007 beleza... http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif Compartilhar este post Link para o post Compartilhar em outros sites