TsysAnimate

[Pablo Herranz]

Buenas, estoy intentando hacer un sistema de copia de seguridad, con
tzipfile (que funciona a la perfeccion), pero el problema lo tengo con el
sysanimate que no se mueve, adjunto el proyecto
Pablo


Attached files filezip.zip (1.8 KB)Â

[Pablo Herranz]

Ya he visto el problema, la ejecucion de tfilezip se come al sysanimate,
¿Como puedo hacer que se mueva algo mientras se comprimen los ficheros?
Saludos
Pablo
"Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
news:[email=425d02fa@ozsrvnegro.ozlan.local...]425d02fa@ozsrvnegro.ozlan.local...[/email]
> Buenas, estoy intentando hacer un sistema de copia de seguridad, con
> tzipfile (que funciona a la perfeccion), pero el problema lo tengo con el
> sysanimate que no se mueve, adjunto el proyecto
>
> Pablo
>
>

[ignacio]

Pablo,
Prueba con:
oZipArchive:OnProgress := {|oSender, cFile, nPos| ProcessMessages() }
Saludos,
"Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
news:425d0455$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Ya he visto el problema, la ejecucion de tfilezip se come al sysanimate,
> ¿Como puedo hacer que se mueva algo mientras se comprimen los ficheros?
>
> Saludos
> Pablo
>
> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
> news:[email=425d02fa@ozsrvnegro.ozlan.local...]425d02fa@ozsrvnegro.ozlan.local...[/email]
>> Buenas, estoy intentando hacer un sistema de copia de seguridad, con
>> tzipfile (que funciona a la perfeccion), pero el problema lo tengo con el
>> sysanimate que no se mueve, adjunto el proyecto
>>
>> Pablo
>>
>>
>
>

[Pablo Herranz]

Perfecto, gracias Ignacio, y ahora la segundaparte, ¿existe algun metodo
para madar el fichero zip generado por correo electronico?
Pablo
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
news:425d0655$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Pablo,
>
> Prueba con:
>
> oZipArchive:OnProgress := {|oSender, cFile, nPos| ProcessMessages() }
>
> Saludos,
>
> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
> news:425d0455$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>> Ya he visto el problema, la ejecucion de tfilezip se come al sysanimate,
>> ¿Como puedo hacer que se mueva algo mientras se comprimen los ficheros?
>>
>> Saludos
>> Pablo
>>
>> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
>> news:[email=425d02fa@ozsrvnegro.ozlan.local...]425d02fa@ozsrvnegro.ozlan.local...[/email]
>>> Buenas, estoy intentando hacer un sistema de copia de seguridad, con
>>> tzipfile (que funciona a la perfeccion), pero el problema lo tengo con
>>> el sysanimate que no se mueve, adjunto el proyecto
>>>
>>> Pablo
>>>
>>>
>>
>>
>
>

[ignacio]

Pablo,
Creo que xHarbour tiene algo al respecto pero no lo he probado. Sino lo
tuviese mira la utilidad blat.
Un saludo,
"Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
news:425d07e3$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Perfecto, gracias Ignacio, y ahora la segundaparte, ¿existe algun metodo
> para madar el fichero zip generado por correo electronico?
>
> Pablo
>
> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
> news:425d0655$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>> Pablo,
>>
>> Prueba con:
>>
>> oZipArchive:OnProgress := {|oSender, cFile, nPos| ProcessMessages() }
>>
>> Saludos,
>>
>> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
>> news:425d0455$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>> Ya he visto el problema, la ejecucion de tfilezip se come al sysanimate,
>>> ¿Como puedo hacer que se mueva algo mientras se comprimen los ficheros?
>>>
>>> Saludos
>>> Pablo
>>>
>>> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
>>> news:[email=425d02fa@ozsrvnegro.ozlan.local...]425d02fa@ozsrvnegro.ozlan.local...[/email]
>>>> Buenas, estoy intentando hacer un sistema de copia de seguridad, con
>>>> tzipfile (que funciona a la perfeccion), pero el problema lo tengo con
>>>> el sysanimate que no se mueve, adjunto el proyecto
>>>>
>>>> Pablo
>>>>
>>>>
>>>
>>>
>>
>>
>
>

[jlalin]

Pablo,
acabo de modificar TZipFile y TUnzipFile para que se encarguen de llamar
automáticamente a ProcessMessages().
Recuerda que puedes quitarlo tras la próxima pre-release.
Saludos,
José Lalí­n

[Pablo Herranz]

Gracias Jose
Pablo
"José Lalín" <dezac@corevia.com> escribió en el mensaje
news:425d90be$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Pablo,
>
> acabo de modificar TZipFile y TUnzipFile para que se encarguen de llamar
> automáticamente a ProcessMessages().
>
> Recuerda que puedes quitarlo tras la próxima pre-release.
>
> Saludos,
> José Lalín