Auxilio para Gravação de Fotos e Imagens

Gostaria de saber se alguém poderia me auxiliar na seguinte questão. Tenho cadastro de clientes, desenvolvido em Delphi 7, utilizando banco de dados SQL Server2000, neste cadastro eu tenho um campo para gravar as fotos dos clientes, mas o que esta acontecendo é que tenho que manter as fotos no meu HD, pois se retiro as fotos do HD ou movo-as da pasta à qual fiz a gravação no banco de dados, quendo ele vai buscar a foto ele me dá a msg que não encontra a referida foto e mostra o caminho pelo qual eu fiz a gravação. Queria saber se há alguma forma de eu gravar definitivamente no banco de dados e excluír a foto definitivamente, pois senão ira ocupar muito espaço no HD...

segue as linhas que utilizo para gravação e para visualização...

Para Gravação

If QryCadCli.FieldByName('Cli_Fot').Value = '' Then

Begin

 Image.Picture.LoadFromFile('C:\Imagem.bmp');

 Image.Refresh;

 End

 Else

 Begin

 Image.Picture.LoadFromFile(QryCadCli.FieldByName('Cli_Fot').AsVariant);

 End;

Para Visualização

If QryCadCli.FieldByName('Cli_Fot').AsVariant <> '' Then

Begin

 Imagem.Picture.LoadFromFile(QryCadCli.FieldByName('Cli_Fot').AsVariant);

 End

 Else

 Begin

 Imagem.Picture.LoadFromFile(C:\Imagem.bmp');

 Imagem.Refresh;

 End;