Alterar imagem

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.