Fórum Alterar imagem #299247
13/10/2005
0
Para gravar uma foto no banco de dados, utilizo um componente TBImage com a seguinte forinta
Var
VImagem : TPicture;
begin
if BuscaImagem.Execute then
begin
VImagem := tPicture.create();
VImagem.LoadFromFile(BuscaImagem.FileName);
Clipboard.Assign(VImagem);
FotoCliente.PasteFromClipboard;
VImagem.Free;
end;
end;
Tá funcionando bem. Minha é a seguinte: Quando quero alterar uma imagem que já está gravada em algum registro e deixá-la sem nada, como faço?
Obrigado.
Var
VImagem : TPicture;
begin
if BuscaImagem.Execute then
begin
VImagem := tPicture.create();
VImagem.LoadFromFile(BuscaImagem.FileName);
Clipboard.Assign(VImagem);
FotoCliente.PasteFromClipboard;
VImagem.Free;
end;
end;
Tá funcionando bem. Minha é a seguinte: Quando quero alterar uma imagem que já está gravada em algum registro e deixá-la sem nada, como faço?
Obrigado.
Armindo
Curtir tópico
+ 0
Responder
Posts
13/10/2005
Marcelo.l
Tente assim:
Se o nome do campo onde é armazenada a image for Tbl_ClienteFOTO
Tbl_ClienteFOTO.Clear;
Se o nome do campo onde é armazenada a image for Tbl_ClienteFOTO
Tbl_ClienteFOTO.Clear;
Responder
Gostei + 0
13/10/2005
Marcio.theis
Vc pode usar tb:
Tbl_ClienteFOTO.AsString:=´´;
Tbl_ClienteFOTO.AsString:=´´;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)