@yahoogrupos.com.br
Assunto: [delphi-br] Ajuda Gravar Imagens
Moçada, aqui estou precisando de uma força (de novo)
Tenho uma rotina que permite ao cabra escolher uma determinada imagem. O
sistema carrega a imagem através de OpenDialog num Image. Agora preciso
gravar esta imagem alterando o nome
José,
assim como você carrego a imagem em um TImage.
Em seguida eu faço o seguinte:
BS := TBlobStream.Create((TABELA.fieldByName('imagem') as
TBlobField), BMWRITE);
IMG := TBitMap.Create;
IMG.LoadFromFile('caminhoDaImagem');
IMG.SaveToStream(BS);
Sendo BS um
Você pode usar a função abaixo:
RenameFile(pathInicial, pathFinal);
---Original Message---
From: Júlio César Santiago Guiótti
Date: 10/11/2009 18:04:07
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Ajuda Gravar Imagens
José,
assim como você carrego
Enviada em: terça-feira, 10 de novembro de 2009 18:20
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Ajuda Gravar Imagens
Você pode usar a função abaixo:
RenameFile(pathInicial, pathFinal);
---Original Message---
From: Júlio César Santiago Guiótti
Date: 10/11/2009
Moçada, aqui estou precisando de uma força (de novo)
Tenho uma rotina que permite ao cabra escolher uma determinada imagem. O
sistema carrega a imagem através de OpenDialog num Image. Agora preciso
gravar esta imagem alterando o nome do arquivo. Estou tentando via
SaveDialog e não estou tendo
5 matches
Mail list logo
