ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Cadastrar imagens no banco de dados

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
jpmrift
Novato
Novato


Registrado: Domingo, 7 de Abril de 2013
Mensagens: 43

MensagemEnviada: Sex Mai 10, 2013 2:25 pm    Assunto: Cadastrar imagens no banco de dados Responder com Citação

Estou usando o paradox porque estou com um problema no meu computador. Nao consigo abrir o firebird. Depois que instalei uma versao mais atual, fiquei com esse problema. Os aplicativos que estou tentando fazer agora servem para meu aprendizado, mas vou melhora-los, certamente.
Galera, como cadastrar produtos com fotos no Paradox? Queria que ao mostrar um registro a foto do produto aparecesse no form. Tem como?
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
c-guedes
Profissional
Profissional


Registrado: Terça-Feira, 31 de Mai de 2005
Mensagens: 502

MensagemEnviada: Sex Mai 10, 2013 3:02 pm    Assunto: Responder com Citação

Amigo, seu tipo de dados na tabela tem que ser binário:

segue código:
Código:
procedure TForm1.Button1Click(Sender: TObject);
var
  Bmp: TBitmap;
begin
  if not OpenDialog1.Execute then
    Exit;
  Bmp := TBitmap.Create;
  try
    Bmp.LoadFromFile(OpenDialog1.FileName);
    Table1.Insert;
    Table1.FieldByName('Imagem').Assign(Bmp);
    Table1.Post;
  finally
    Bmp.Free;
  end;
end;

_________________
Camargo Felis Guedes
"Posso todas as coisas naquele que me fortalece" flp. 4:13
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail Visitar a homepage do Usuário MSN Messenger
Batera
Colaborador
Colaborador


Registrado: Quarta-Feira, 23 de Julho de 2008
Mensagens: 4899
Localização: Maringá

MensagemEnviada: Sex Mai 10, 2013 8:02 pm    Assunto: Responder com Citação

Bom, eu ainda defendo a ideia de não cadastrar imagens no banco de dados, e sim copiá-la para uma subpasta do executável. Assim você precisa gravar só o caminho:
Código:
// Coluna "Imagem" no banco de dados:
C:\Sistema\Imagens\Produto1.jpg
C:\Sistema\Imagens\Produto2.jpg
.
.
.
C:\Sistema\Imagens\ProdutoN.jpg

Só uma sugestão, ok?
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Visitar a homepage do Usuário
c-guedes
Profissional
Profissional


Registrado: Terça-Feira, 31 de Mai de 2005
Mensagens: 502

MensagemEnviada: Sex Mai 10, 2013 8:53 pm    Assunto: Responder com Citação

Apoiado Batera,

eu também não acho uma boa ideia o banco começa a crescer em proporções muito grande.
_________________
Camargo Felis Guedes
"Posso todas as coisas naquele que me fortalece" flp. 4:13
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail Visitar a homepage do Usuário MSN Messenger
jpmrift
Novato
Novato


Registrado: Domingo, 7 de Abril de 2013
Mensagens: 43

MensagemEnviada: Sáb Mai 11, 2013 12:04 am    Assunto: Responder com Citação

No caso de nao gravar a imagem no BD, como seria? Qual seria o código para indicar o caminho onde estao as imagens? E mais, como devem estar as propriedades desse componente OpenDialog?
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
jpmrift
Novato
Novato


Registrado: Domingo, 7 de Abril de 2013
Mensagens: 43

MensagemEnviada: Sáb Mai 11, 2013 12:58 am    Assunto: Responder com Citação

O component OpenPictureDialog nao está visível quando o form é acionado. Porque?
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
anderbelluno
Colaborador
Colaborador


Registrado: Quarta-Feira, 23 de Novembro de 2011
Mensagens: 1030
Localização: Cianorte-PR

MensagemEnviada: Sáb Mai 11, 2013 7:40 am    Assunto: Responder com Citação

pq é um componente nao visual.

quando vc o executa ele vai abrir um dialogo com o windows onde vc vai escolher onde esta sua imagem.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
jpmrift
Novato
Novato


Registrado: Domingo, 7 de Abril de 2013
Mensagens: 43

MensagemEnviada: Sáb Mai 11, 2013 9:58 am    Assunto: Responder com Citação

Veleu meu irmao, obrigado. Deu certo.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
c-guedes
Profissional
Profissional


Registrado: Terça-Feira, 31 de Mai de 2005
Mensagens: 502

MensagemEnviada: Sáb Mai 11, 2013 10:20 am    Assunto: Responder com Citação

Edit seu post e coloque [RESOLVIDO]
_________________
Camargo Felis Guedes
"Posso todas as coisas naquele que me fortalece" flp. 4:13
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail Visitar a homepage do Usuário MSN Messenger
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB