Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

webrodex

Paradox gravando foto e lendo

Recommended Posts

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

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 Graphics

Uma 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

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

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.