Imagens dos produtos
Bom dia a todos!
Bem pessoal, gostaria de saber como faço para trabalhar com imagens relacionadas a produtos em um banco de dados. Sei que não é recomendável gravar as imagens em no banco, então criei uma tabela com o código EAN de cada produto e seu respectivo nome, e no diretóro de nome imagens coloquei as imagens dos produtos com seu respectivo nome igual ao que eu fiz no banco, minha dúvida agora é saber como fazer que ele ´pegue´ a imagem do diretório para apresentá-la após uma consulta, alguém tem idéia?
Angelo
Bem pessoal, gostaria de saber como faço para trabalhar com imagens relacionadas a produtos em um banco de dados. Sei que não é recomendável gravar as imagens em no banco, então criei uma tabela com o código EAN de cada produto e seu respectivo nome, e no diretóro de nome imagens coloquei as imagens dos produtos com seu respectivo nome igual ao que eu fiz no banco, minha dúvida agora é saber como fazer que ele ´pegue´ a imagem do diretório para apresentá-la após uma consulta, alguém tem idéia?
Angelo
Angelo
Curtidas 0
Respostas
Dedi
30/04/2003
[color=blue]SE ESTIVER USANDO DBE[/color]
VAR
Lista : TStringList;
BEGIN
basededados := ´´;
if Trim(´NOMEDOALIAS´) <> ´´ then
BEGIN
Lista := TStringList.Create;
Session.GetAliasParams(´NOMEDOALIAS´,Lista);
basededados := Copy(Lista[0],6,Length(Lista[0])-5);
basededados := basededados + ´\´;
foto:= basededados +´fotos\´+PRODUTO+´.jpg´;
if FileExists(foto) then
begin
Image1.Visible:=true;
Image1.Picture.LoadFromFile(foto);
end;
END;
END;
se tiver duvidas so falar;
no caso o diretorio ´foto´ está dentro do Diretorio de dados
VAR
Lista : TStringList;
BEGIN
basededados := ´´;
if Trim(´NOMEDOALIAS´) <> ´´ then
BEGIN
Lista := TStringList.Create;
Session.GetAliasParams(´NOMEDOALIAS´,Lista);
basededados := Copy(Lista[0],6,Length(Lista[0])-5);
basededados := basededados + ´\´;
foto:= basededados +´fotos\´+PRODUTO+´.jpg´;
if FileExists(foto) then
begin
Image1.Visible:=true;
Image1.Picture.LoadFromFile(foto);
end;
END;
END;
se tiver duvidas so falar;
no caso o diretorio ´foto´ está dentro do Diretorio de dados
GOSTEI 0