Como apagar uma imagem no registro !!
30/04/2008
0
Estou usando Delphi7 + Firebird 1.5 + DBExpress.
É o seguinte, tenho no meu banco de dados uns campos do tipo BLOB que que armazenam imagens, e no D7 estou usando o componente DBIMAGE da paleta DATACONTROLS, em conjunto tmb estou usando um componente de terceiros para scanear a imagem e salvar direto no DB.
Esta funcionado perfeitamente bem para armazenar no DB, a questão é como faço para derrepente eu precisar apagar somente esta foto do banco de dados, gravar estou conseguindo agora o problema é em deletar apenas esta imagem, consigo alterar e cadastar novas, mas não sei como faço para exclui-la.
Se alguem puder me ajudar ficaria muito grato.
Abraços.
Osvaldo Domênico
Badboysjc
Post mais votado
30/04/2008
Se for excluir só a informação da imagem....
QueryImagem.Edit;
QueryImagem.FieldByName(´IMAGEM´).asVariant := Null;
QueryImagem.Post...
Se for excluir o registro todo...
QueryImagem.Delete;
Se ainda continuo errado com a minha resposta... me diga...
Diegus
Mais Posts
30/04/2008
Diegus
Se jogar Null não funcionaria?
Estamos ai... qq coisa é só falar...
30/04/2008
Badboysjc
Para eu atualizar eu apenas chamo a rotina do scaner e ele subistitui apenas esta imagem. A questão é seu quiser excluir esta imagem do DB como que eu faço ?
Entendeu ?
abraços.
30/04/2008
Badboysjc
obrigado mesmo, problema resolvido:
procedure TfrmClientes.btnCancelarRGFrenteClick(Sender: TObject);
begin
DMPrincipal.cdsClientes.Edit;
DMPrincipal.cdsClientesDOCUMENTO_SCANNER1.AsVariant := Null;
DMPrincipal.cdsClientes.Post;
DMPrincipal.cdsClientes.ApplyUpdates(0);
end;
valeu pela ajuda.
abraços.
30/04/2008
Diegus
De nada! ... qualquer coisa é só perguntar!
25/11/2020
Jefferson
QryCadProdutos.FieldByName(''FOTO'').AsVariant := null;
vlw!
Clique aqui para fazer login e interagir na Comunidade :)