Fórum Atualizar imagem de um componente TImage #342401

Tenho um componente TImage, que precisa ficar sendo atualizado o tempo todo, pois a imagem q ele está mostrando é sempre atualizada, mas não posso efetuar LoadFromFile, todo momento pois a imagem está sempre sendo atualizada e dá erro falando que a imagem está em uso.
Tentei fazer dessa forma:
procedure CarregaImage(bmp : TBitmap; Filename : string);
var
Stream: TStream;
begin
try
Stream := TFileStream.Create(Filename, fmOpenRead or fmShareDenyWrite);
try
bmp.LoadFromStream(Stream);
finally
Stream.Free;
end;
except
end;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
CarregaImage(Image1.Picture.Bitmap, ´C:\teste.bmp´);
end;

Mas assim também dá essa mesma mansagem que o arquivo está em uso, como consigo autalizar essa imagem que está sempre sendo atualizar sem dar esse erro?