Barra de Progress en Carga de Imagen

[ecfisa]

Hola shoulder.

La verdad no sé como podrías implementarlo... Es que en realidad no se trata del evento OnProgress de un TImage sino de otro (un TPDFImage) y desconozco todo sobre ese componente.

Saludos

[shoulder]

Gracias igual Ecfisa, encontre que el onprogress no funciona fuera del formato jpeg y verdaderamente no encontre nada en la red como se hace un progreso o una imagen de espera cuando se carga un pdf.

[Casimiro Noteví]

Pon un icono animado antes y lo quitas después. No es lo mismo, pero "da el pego",

Código Delphi [-]
 iconoanimado.Show;
 Image1.Picture.loadFromFile(archivo);
 TPDFImage(Image1.Picture.Graphic).LastPage;
 Label2.Caption:='Página Actual : ' + IntToStr(TPDFImage(Image1.Picture.Graphic).CurrentPage);
 Label1.Caption:='Páginas : ' + IntToStr(TPDFImage(Image1.Picture.Graphic).Pagecount);
 Scrollbar1.SetFocus;
 iconoanimado.Hide;

[shoulder]

Gracias Funciono al menos se dan cuenta que no se bloqueo el sistema.

Código Delphi [-]
 Screen.Cursor := crAPPStart;
 Image1.Picture.loadFromFile(archivo);
 TPDFImage(Image1.Picture.Graphic).LastPage;
 Label2.Caption:='Página Actual : ' + IntToStr(TPDFImage(Image1.Picture.Graphic).CurrentPage);
 Label1.Caption:='Páginas : ' + IntToStr(TPDFImage(Image1.Picture.Graphic).Pagecount);
 //bitbtn6.Click;
 Label3.Visible := False;
 Scrollbar1.SetFocus;
 Screen.Cursor := crDefault;

[[nlsgarcia]]

shoulder,

Empezado por shoulder

...¿Hay alguna forma de mostrar un Progress o reloj de arena cuando cargo una Timage?...

Revisa esta información:

Barra de Progreso Infinita en Windows con Delphi 7

Espero sea útil

Nelson.

[ecfisa]

Hola.

Creo que el principal escollo con que se encuentra shoulder para usar una gráfica de progreso con el componente TPDFImage, es que no puede acceder al evento del cuál obtener el valor actual del proceso.

Pienso que mientras se carezca de dicha posibilidad, la alternativa de Casimiro no solo es buena, sino que pareciera la única.

Saludos

[shoulder]

Las dos alternativas son excelentes, me sirvio, recomiendo el componente es rapido y se puede crear una buena ventana lectora de PDF el TPDFImagen.
Gracias.