| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
omor Membro Junior

Registrado: Segunda-Feira, 12 de Novembro de 2012 Mensagens: 383
|
Enviada: Sex Nov 30, 2012 11:20 am Assunto: Gravar caminho da foto no banco de dados Delphi (RESOLVIDO) |
|
|
Olá estou tentando gravar o caminho da foto no banco de dados com o seguinte código só que está retornando erro
begin
if AbreFoto.Execute then
begin
Image1.Picture.LoadFromFile(AbreFoto.FileName);
DataModule1.TabelaProdutosFoto.value:= AbreFoto.FileName;(erro nesta linha)
end;
end;
Resolvido
uso o banco de dados access
criei um campo "Caminho" ao invés de "Foto"
e coloquei tipo "text" ao invés de "blob"
meu código no delphi ficou assim no botão procurar foto
begin
if AbreFoto.Execute then
begin
DataModule1.TabelaProdutos.Open;
DataModule1.TabelaProdutos.Edit;
Image1.Picture.LoadFromFile(AbreFoto.FileName);
DataModule1.TabelaProdutosCaminho.AsString:= AbreFoto.FileName;
end;
end;
onde "AbreFoto" é o componente TOpenDialog
Editado pela última vez por omor em Sex Nov 30, 2012 5:05 pm, num total de 1 vez |
|
| Voltar ao Topo |
|
 |
GustavoAlmeidaFerreira Novato


Registrado: Quinta-Feira, 25 de Outubro de 2012 Mensagens: 53
|
Enviada: Sex Nov 30, 2012 11:46 am Assunto: Re: Gravar caminho da foto no banco de dados Delphi XE3 |
|
|
| omor escreveu: | Olá estou tentando gravar o caminho da foto no banco de dados com o seguinte código só que está retornando erro
begin
if AbreFoto.Execute then
begin
Image1.Picture.LoadFromFile(AbreFoto.FileName);
DataModule1.TabelaProdutosFoto.value:= AbreFoto.FileName;(erro nesta linha)
end;
end; |
Cara, tenta assim:
DataModule1.TabelaProdutos.insert;
DataModule1.TabelaProdutosFoto.asString:= AbreFoto.FileName;
DataModule1.TabelaProdutos.post; |
|
| Voltar ao Topo |
|
 |
|