SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: ROBER.29 en Miércoles 26 de Febrero de 2003, 19:24

Título: Re: Copiar ficheros
Publicado por: ROBER.29 en Miércoles 26 de Febrero de 2003, 19:24
Hola,
Quiero saber que es lo que tengo que hacer para similar la copia de ficheros de windows, es decir, yo tengo una aplicación que me copia ficheros de unos sitios a otros y quiero mostrar una ventana en la que aparezca el fichero que esta copiando en cada momento del proceso y la animación del papelito pasando de una carpeta a otra.
Alguien me puede ayudar?

Gracias por atenderme.

Saludos,
Roberto García
Título: Re: Copiar ficheros
Publicado por: José D en Jueves 27 de Febrero de 2003, 01:04
Para eso debes de usar el control Animation el cual podrás conseguir en la lista de componentes bajo el nombre:
Microsoft Windows Common Controls-2 6.0
O versión anterior, da igual.

Luego buscas con el Buscador de Windows la ruta del archivo de windows llamado: FILECOPY.AVI
Ese mismo de la carpetica pasando el papelito a otra carpetica.

A mi me da problemas al poner la ruta larga, así que si quieres, copialo a la carpeta en donde tienes el proyecto y lo buscas desde ahí.

Yo lo he pasado a C:FILECOPY.AVI solo para este ejemplo.

Insertas el Animation y colocas este código:
Dim RUTA As String
RUTA = "C:FILECOPY.AVI"
Animation1.Open (RUTA)
Animation1.Play

El mismo Animation puede pararlo con su respectivo .Close, aunque yo le he puesto un control Timer a dicho Formulario el cual cierra el formulario (ventanita de copia) para que no se quede reproduciendolo constatemente.

Supongo que eso lo pondrás en una ventana a parte, una que solo muestre eso ¡verdad!.

Al Timer puedes ponerle un Interval de 1850 y en su propiedad Timer1_Timer pones Unload Me
A dicha ventanita la llamas de forma modal así: Form2.Show vbModal

Un saludo.
Título: Copiar ficheros
Publicado por: ROBER.29 en Jueves 27 de Febrero de 2003, 09:49
Muchas gracias por ayudarme.

Tenia una pequeña idea de que era algo asi, pero es que probé algo muy parecido y lo único que hacia era darme error.

Muchas gracias.

Saludos,
Roberto García.