Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Comprimir con Zipmaster (https://www.clubdelphi.com/foros/showthread.php?t=62612)

ulice 04-01-2009 23:31:00

Comprimir con Zipmaster
 
Saludo a todos.
Necesito ayuda para obtener archivos multivolúmenes comprimidos en el disco duro. Para ello, uso el componente Zipmaster. He logrado comprimir pero no dividir. No importa si el resultado es *.zip o *.rar Yo uso Delphi 7 y la versión de Zipmaster es zm179setup1004

Mis agradecimientos a todos por adelantado.

El código que he usado es el siguiente:

Código Delphi [-]
Procedure TF_MA.Comprimir;
var
Origen, Destino, Nombre: String;

begin
Nombre:= LE_NombreCoprimido.Text;
Origen:=LE_Dir_Origen.Text+'\*.*';
Destino:=LE_Dir_Destino.Text+'\';
ZipMaster1.DLLDirectory := ExtractFilePath( Application.ExeName );
ZipMaster1.ZipFileName := Destino+nombre+'.zip';
ZipMaster1.TempDir := Origen;
ZipMaster1.FSpecArgs.Clear;
ZipMaster1.FSpecArgs.Add(Origen);
try
ZipMaster1.Add;
except
raise exception.Create( 'Error al comprimir los archivos.' );
end;
end;

MAXIUM 04-01-2009 23:49:55

http://delphiallimite.blogspot.com/2...zipmaster.html

ulice 05-01-2009 00:06:26

La dirección que me das no me dice cómo comprimir en multivolumenes o multipartes

cHackAll 05-01-2009 02:01:48

ZipMaster.AddOptions.AddDiskSpan & SpanOptions

ulice 11-01-2009 20:51:25

No logro que me funcione
 
He revisado estas opciones pero no me sirven mucho, No logro comprimir en multivolúmenes en una dirección dentro del disco duro, que es lo que quiero.
Podrían ser más específico.
:confused:

marcoszorrilla 11-01-2009 21:24:21

Mira esto:
Cita:

Describes how the archive file will be stored on disk.

Unit

ZipForge

type TZFSpanningMode = (smNone, smSpanning, smSplitting);

Description

SpanningMode determines how the archive file will be stored on disk: as a single file, as multiple files or it will be stored on removable disks. SpanningOptions property determines how the archive file will be splitted or spanned.

SpanningMode can be set to any of the following values:

Value Meaning
smNone The archive will be stored as a single OS file.
smSpanning The archive file will be stored on removable disks.
smSplitting The archive will be stored as multiple OS files.
Un Saludo.

ulice 16-01-2009 00:39:46

Será que no lo hace?
 
El código que me pides que revise se refiere al ZipForge. y el que estoy trabajando es el Zipmaster.
¿Será que el Zipmaster no tiene entre sus posibilidades comprimir archivos o carpetas en multivolúmenes (multipartes) en el disco duro?.
Porque sólo e encontrado bibliografía para comprimir en unidades extraíbles.
Si no existe esta posibilidad. Por favor, que alguien me lo diga para abandonar el componente. Estaré agradecido.

ulice 16-01-2009 00:40:21

Será que no lo hace?
 
El código que me propones que revise, se refiere al ZipForge. y es el Zipmaster el que estoy trabajando.
Le agregué al proyecto el siguiente código que debía permitir comprimir en archivos de 100 b y no me dió un buen resultado:

Código Delphi [-]
ZipMaster1.MaxVolumeSize:=100;
ZipMaster1.SpanOptions:=[spCompatName];

¿Será que el Zipmaster no tiene entre sus posibilidades comprimir archivos o carpetas en multivolúmenes (multipartes) en el disco duro?.
Porque sólo he encontrado bibliografía para comprimir en unidades extraíbles.
Si no existe esta posibilidad. Por favor, que alguien me lo diga para abandonar el componente. Estaré agradecido.

CCCP 15-01-2019 18:19:24

ZipMaster v1.79
 
Alguien tiene por ahi esta versión?

Casimiro Notevi 15-01-2019 20:12:07

Por aquí está.


La franja horaria es GMT +2. Ahora son las 11:09:21.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi