[delphi-br] Inserir imagem
Estou desenvolvendo um programa de carteira de mebros e preciso colar um jpg em outro, como faço isso, visto que estou trabalhando com o componente Image. Desculpe se minha pergunta é primaria pois estou começando agora a trabalhar com delphi.
[delphi-br] Inserir imagem usando n-tier DB Firebird
Boa tarde galera, é o seguinte, estou precisando inserir uma imagem no meu banco Firebird, estou usando 3-camadassoh no meu cliente tenho um componente DBImage que visualiza a imagem ok so q quando mando gravar o server nao grava ta mais ou menos assim if DeltaDS.Fields[i].AsString '' then begin case DeltaDs.Fields[i].DataType of ftTimeStamp : sql_upd_tgr_pessoa.ParamByName(DeltaDS.Fields[i].FieldName).AsDateTime := DeltaDS.Fields[i].AsDateTime; ftDateTime : sql_upd_tgr_pessoa.ParamByName(DeltaDS.Fields[i].FieldName).AsString:= DeltaDS.Fields[i].AsString; ftGraphic : sql_upd_tgr_pessoa.ParamByName(DeltaDS.Fields[i].FieldName).asBlob := := DeltaDS.Fields[i].AsBlob; -- ou Value else sql_upd_tgr_pessoa.ParamByName(DeltaDS.Fields[i].FieldName).AsString := DeltaDS.Fields[i].AsString; end; ele passa por este ftGraphic mais quando chega para gravar...necas...estou procurando no google... mas ainda ndase alguem disponivel puder ajudar.. abs, Rodrigo Mota.
Re: [delphi-br] Inserir imagem usando n-tier DB Firebird
Salve Rodrigo No meu link de downloads tem um exemplo, o do BorCon 2006 q possui um exemplo de cadastro com imagens, talvez ajude. Link: http://cc.codegear.com/Author.aspx?ID=795118 Abração Bruno Lichot Rodrigo Mota escreveu: Boa tarde galera, é o seguinte, estou precisando inserir uma imagem no meu banco Firebird, estou usando 3-camadassoh no meu cliente tenho um componente DBImage que visualiza a imagem ok so q quando mando gravar o server nao grava ta mais ou menos assim if DeltaDS.Fields[i].AsString '' then begin case DeltaDs.Fields[i].DataType of ftTimeStamp : sql_upd_tgr_pessoa.ParamByName(DeltaDS.Fields[i].FieldName).AsDateTime := DeltaDS.Fields[i].AsDateTime; ftDateTime : sql_upd_tgr_pessoa.ParamByName(DeltaDS.Fields[i].FieldName).AsString:= DeltaDS.Fields[i].AsString; ftGraphic : sql_upd_tgr_pessoa.ParamByName(DeltaDS.Fields[i].FieldName).asBlob := := DeltaDS.Fields[i].AsBlob; -- ou Value else sql_upd_tgr_pessoa.ParamByName(DeltaDS.Fields[i].FieldName).AsString := DeltaDS.Fields[i].AsString; end; ele passa por este ftGraphic mais quando chega para gravar...necas...estou procurando no google... mas ainda ndase alguem disponivel puder ajudar.. abs, Rodrigo Mota. __ Informação do NOD32 IMON 1939 (20061226) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br -- -- []´s Bruno Lichot
RES: [delphi-br] Inserir imagem usando n-tier DB Firebird
Oi Brunão ja consegui ja vi seu exemplo agora, E tb ta simples e funcional...hehe Abs, Rodrigo Mota. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Bruno Lichot Enviada em: terça-feira, 26 de dezembro de 2006 15:08 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Inserir imagem usando n-tier DB Firebird Salve Rodrigo No meu link de downloads tem um exemplo, o do BorCon 2006 q possui um exemplo de cadastro com imagens, talvez ajude. Link: http://cc.codegear. http://cc.codegear.com/Author.aspx?ID=795118 com/Author.aspx?ID=795118 Abração Bruno Lichot Rodrigo Mota escreveu: Boa tarde galera, é o seguinte, estou precisando inserir uma imagem no meu banco Firebird, estou usando 3-camadassoh no meu cliente tenho um componente DBImage que visualiza a imagem ok so q quando mando gravar o server nao grava ta mais ou menos assim if DeltaDS.Fields[i].AsString '' then begin case DeltaDs.Fields[i].DataType of ftTimeStamp : sql_upd_tgr_pessoa.ParamByName(DeltaDS.Fields[i].FieldName).AsDateTime := DeltaDS.Fields[i].AsDateTime; ftDateTime : sql_upd_tgr_pessoa.ParamByName(DeltaDS.Fields[i].FieldName).AsString := DeltaDS.Fields[i].AsString; ftGraphic : sql_upd_tgr_pessoa.ParamByName(DeltaDS.Fields[i].FieldName).asBlob := := DeltaDS.Fields[i].AsBlob; -- ou Value else sql_upd_tgr_pessoa.ParamByName(DeltaDS.Fields[i].FieldName).AsString := DeltaDS.Fields[i].AsString; end; ele passa por este ftGraphic mais quando chega para gravar...necas...estou procurando no google... mas ainda ndase alguem disponivel puder ajudar.. abs, Rodrigo Mota. __ Informação do NOD32 IMON 1939 (20061226) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset. http://www.eset.com.br com.br -- -- []´s Bruno Lichot [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Inserir imagem em TRichEdit - é possível?
Boa tarde a todos, gostaria de saber se alguém sabe como fazer para inserir uma imagem num TRichEdit. É possível fazer isso (acredito que sim, pelo canvas.draw) mas quando rolarmos o texto ficaria 100% ? []s a todos, Filipe Ferrarini [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Inserir Imagem - E para apagar???
Gente, com a ajuda de vcs consegui o problema de inserir e gravar a imagem, mas agora eu queria apagar a imagem do Image... Qual comando para apagar? Obrigado!!! PS: só quero saber para a apagar do image, apagar do banco sem problemas - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! agora. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Inserir Imagem - E para apagar???
Oi Erika, vamos lá novamente DeleteFile('E o caminho da foto'); Exemplo DeleteFile('C:\Pasta_foto\1587.jpg'); é só isso. On Mon, 31 Jan 2005 12:26:12 -0300 (ART), Erika Lemes [EMAIL PROTECTED] wrote: Gente, com a ajuda de vcs consegui o problema de inserir e gravar a imagem, mas agora eu queria apagar a imagem do Image... Qual comando para apagar? Obrigado!!! PS: só quero saber para a apagar do image, apagar do banco sem problemas - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! agora. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Inserir Imagem - E para apagar???
Boa tarde, Érika! Se quiser apagar a imagem do seu Image, faça o seguinte: SeuTImage.Picture.Bitmap:=nil; Boa sorte. Ulisses - Original Message - From: Erika Lemes To: delphi-br@yahoogrupos.com.br Sent: Monday, January 31, 2005 1:26 PM Subject: [delphi-br] Inserir Imagem - E para apagar??? Gente, com a ajuda de vcs consegui o problema de inserir e gravar a imagem, mas agora eu queria apagar a imagem do Image... Qual comando para apagar? Obrigado!!! PS: só quero saber para a apagar do image, apagar do banco sem problemas - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! agora. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Inserir Imagem
Oi Erika, vc faz o seguinte Primeiro coloque um image e na propriedade do image onde tem picture é onde vc carrega a figura. Vc pode colocar em tempo de execução (Rum time). Tipo assim No OnCreate do formulario faça: procedure TForm1.FormCreate(Sender: TObject); begin Image1.Picture.LoadFromFile('Caminho onde está a figura'); end; procedure TForm1.FormCreate(Sender: TObject); begin Image1.Picture.LoadFromFile('C:\Windows\bolhas.bmp); end; Pronto amiga espero que essa dica ajude vc. Pronto assim que seu form for carregado e criado sua figura aparecera On Sun, 30 Jan 2005 06:00:17 -, Erika [EMAIL PROTECTED] wrote: Oi gente.. Eu tenho um cadastro em que eu gostaria de colocar a foto da pessoa. Sou novata no Delphi e queria ajuda para fazer isso! Por onde começo??? Como eu faço para procurar e carregar a imagem no form? Agradeço se alguém me ajudar! Obrigado! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Inserir Imagem
Oi Emerson... na verdade eu queria que o usuário pudesse escolher a figura, na verdade a foto do cliente que está sendo cadastrado, sabe? Como faço? Obrigado por responder!!! Erika Emerson Moreno [EMAIL PROTECTED] wrote: Oi Erika, vc faz o seguinte Primeiro coloque um image e na propriedade do image onde tem picture é onde vc carrega a figura. Vc pode colocar em tempo de execução (Rum time). Tipo assim No OnCreate do formulario faça: procedure TForm1.FormCreate(Sender: TObject); begin Image1.Picture.LoadFromFile('Caminho onde está a figura'); end; procedure TForm1.FormCreate(Sender: TObject); begin Image1.Picture.LoadFromFile('C:\Windows\bolhas.bmp); end; Pronto amiga espero que essa dica ajude vc. Pronto assim que seu form for carregado e criado sua figura aparecera On Sun, 30 Jan 2005 06:00:17 -, Erika [EMAIL PROTECTED] wrote: Oi gente.. Eu tenho um cadastro em que eu gostaria de colocar a foto da pessoa. Sou novata no Delphi e queria ajuda para fazer isso! Por onde começo??? Como eu faço para procurar e carregar a imagem no form? Agradeço se alguém me ajudar! Obrigado! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE - Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Inserir Imagem
Erika. Você pode colocar um OpenDialog, para fazer o usuário clicar no botão e escolher a foto que quiser. Use a função OpenDialog.Execute para abrir o diálogo, assim: if OpenDialog.execute then . Qualquer coisa, no help tem bastante ajuda,ok? Se não conseguir, dá um toque. []´s Giovani. - Original Message - From: Erika Lemes To: delphi-br@yahoogrupos.com.br Sent: Sunday, January 30, 2005 5:09 PM Subject: Re: [delphi-br] Inserir Imagem Oi Emerson... na verdade eu queria que o usuário pudesse escolher a figura, na verdade a foto do cliente que está sendo cadastrado, sabe? Como faço? Obrigado por responder!!! Erika -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.8.2 - Release Date: 28/1/2005 [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Inserir Imagem
No D, seção ou guia Dialogs vc vai ver uma ferramenta (OpenPictureDialogs) ou (OpenDialogs), eu gosto de trabalhar com figuras no OpenPictureDialogs coloca um botão (Procurar foto)... Adiciona tbm um DBImagem na seção ou guia (Data Controls) no evento onclick.. if OpenPictureDialogs.Execute then begin DBImagem1.BackImage.LoadFromFile(OpenPictureDialogs.FileName); end; valeuuu!!! - Original Message - From: Emerson Moreno To: delphi-br@yahoogrupos.com.br Sent: Sunday, January 30, 2005 8:20 PM Subject: Re: [delphi-br] Inserir Imagem Oi Erika, desculpa amiguinha mas não entendi direito o que voce quer, pode explicar com mais detalhes por favor. On Sun, 30 Jan 2005 17:30:11 -0200, Giovani - Terra [EMAIL PROTECTED] wrote: Erika. Você pode colocar um OpenDialog, para fazer o usuário clicar no botão e escolher a foto que quiser. Use a função OpenDialog.Execute para abrir o diálogo, assim: if OpenDialog.execute then . Qualquer coisa, no help tem bastante ajuda,ok? Se não conseguir, dá um toque. []´s Giovani. - Original Message - From: Erika Lemes To: delphi-br@yahoogrupos.com.br Sent: Sunday, January 30, 2005 5:09 PM Subject: Re: [delphi-br] Inserir Imagem Oi Emerson... na verdade eu queria que o usuário pudesse escolher a figura, na verdade a foto do cliente que está sendo cadastrado, sabe? Como faço? Obrigado por responder!!! Erika -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.8.2 - Release Date: 28/1/2005 [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: Yahoo! Grupos, um serviço oferecido por: Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Inserir Imagem
Oi gente.. Eu tenho um cadastro em que eu gostaria de colocar a foto da pessoa. Sou novata no Delphi e queria ajuda para fazer isso! Por onde começo??? Como eu faço para procurar e carregar a imagem no form? Agradeço se alguém me ajudar! Obrigado! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html