Assunto: Re: RES: RES: RES: Res: [delphi-br] Salvar uma imagem
Não tem problema meu camarada!
Apenas mude a linha
img1.Picture.SaveToFile('Caminho' + NomeDoArquivo);
Exemplo:
img1.Picture.SaveToFile('C:\Monit\bin\arqs\' +
dmCadastro.cdsFotoFoto.Value);
O 'NomeDoArquivo' é o campo da tabela onde se
PROTECTED] Em
nome de Carlos
Enviada em: segunda-feira, 18 de agosto de 2008 23:50
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: RES: RES: Res: [delphi-br] Salvar uma imagem
Meu camarada, boa noite!
Você informou que a imagem já está salva no banco de dados em formato
JPG correto.
Em caso
Não tem problema meu camarada!
Apenas mude a linha
img1.Picture.SaveToFile('Caminho' + NomeDoArquivo);
Exemplo:
img1.Picture.SaveToFile('C:\Monit\bin\arqs\' +
dmCadastro.cdsFotoFoto.Value);
O 'NomeDoArquivo' é o campo da tabela onde se encontra a imagem no
banco de dados.
Espero ter
: sexta-feira, 15 de agosto de 2008 16:43
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: Res: [delphi-br] Salvar uma imagem
Meu camarada, boa tarde! Quanto a caixa alta, sem problemas, esta vida
de desenvolvedor deixa qualquer um meio fora de foco às vezes... rsrs...
Eu salvo a imagem em
É claro meu camarada, não é abuso nenhum, aliás, é uma correção, haja
vista eu achava que já a tinha enviado.
procedure ExibeFoto(DataSet : TDataSet; BlobFieldName : String;
ImageExibicao : TImage);
var
BlobStream : TStream;
JpegImage : TJPEGImage;
bitmap:TBitMap;
begin
BlobStream :=
@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Carlos
Enviada em: segunda-feira, 18 de agosto de 2008 09:54
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: RES: Res: [delphi-br] Salvar uma imagem
É claro meu camarada, não é abuso nenhum, aliás, é uma correção, haja
vista eu achava que já
Meu camarada, boa noite!
Você informou que a imagem já está salva no banco de dados em formato
JPG correto.
Em caso afirmativo, eu pus no meu form um TImage(propriedade visible =
false), e usei a função ExibeFoto para inseri-la no TImage desta forma:
TImage.Picture := nil;
ExibeFoto(Nome do
Bom dia pessoal,
Preciso salvar algumas fotos armazenadas em banco de dados Paradox p/ um JPG
ou BMP, qual sabe como fazer?
Tentei assim NTClientesfoto.SaveToFile('C:\foto.jpg'); mas não salda a
imagem.
Dimas Bolognani
Ouro Fino - MG
[As partes desta mensagem que não
Que tipo de objeto é esse NTClientesfoto?
Luciano Calenzani Simões
- Mensagem original
De: Dimas Bolognani [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 15 de Agosto de 2008 8:31:59
Assunto: [delphi-br] Salvar uma imagem
Bom dia pessoal,
Preciso
Agosto de 2008 8:31:59
Assunto: [delphi-br] Salvar uma imagem
Bom dia pessoal,
Preciso salvar algumas fotos armazenadas em banco de dados Paradox p/ um JPG
ou BMP, qual sabe como fazer?
Tentei assim NTClientesfoto. SaveToFile( 'C:\foto. jpg'); mas não salda a
imagem.
Dimas Bolognani
Ouro Fino
: [delphi-br] Salvar uma imagem
Meu camarada, bom dia!
Vamos ver se eu entendi.Você quer salvar imagens em BD no formato JPG
ou BPM, é isso?
Caso seja isto, vc pode usar a função abaixo:
procedure GravaFoto(DataSet : TDataSet; BlobFieldName, FileName :
String; Nome: String);
var
ext, mDir, mSql
Carlos me desculpa pela caixa alta na mensagem anterior... não tinha
reparado.
_
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Carlos
Enviada em: sexta-feira, 15 de agosto de 2008 09:38
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: Res: [delphi-br] Salvar uma
Meu camarada, boa tarde! Quanto a caixa alta, sem problemas, esta vida
de desenvolvedor deixa qualquer um meio fora de foco às vezes... rsrs...
Eu salvo a imagem em disco de duas formas:
1ª Se o cliente ira visualizar a imagem em um TImage e após isso irá
salvar a imagem em um diretório a sua
13 matches
Mail list logo