al copiar animación delphi 2007

[ecfisa]

Hola.

Yo uso Delphi 7 con GifImage y no he tenido ningún problema, pero no sé si Delphi 2007 ya soporta ese formato, de ser así sería innecesario usar código de terceros.

Un ejemplo simple de lo que te comento (usando GifImage) sería:

Código Delphi [-]
...
procedure TForm1.FormShow(Sender: TObject);
begin
  Image1.Picture.LoadFromFile('C:\Imagenes\Copiar.gif');
  Image1.Visible:= False;
end;

procedure ComenzarCopia(Img: TImage);
begin
  // iniciar tareas de copia
  Img.Visible:= True;
end;

procedure FinalizarCopia(Img: TImage);
begin
  Img.Visible:= False;
  // finalizar tareas de copia
end;
...

Saludos.