Ver Mensaje Individual
  #4  
Antiguo 09-08-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
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.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 09-08-2011 a las 22:07:02.
Responder Con Cita