No conozco el componente (nunca lo he usado), pero me resulta raro lo siguiente:
Creo que en vez de ExtractFilename deberías usar ExtractFilePath para las rutas
(DLLDirectory, CreateDir y ExtrBaseDir)
Código Delphi
[-]
...
ZipMaster.DLLDirectory := ExtractFilename(Archivo);
ZipMaster.ZipFileName := ExtractFilename(Archivo);
CreateDir('C:\WINDOWS\TEMP\'+ExtractFilename(Archivo));
ZipMaster.ExtrBaseDir := 'C:\WINDOWS\TEMP\'+ExtractFilename(Archivo);
...
Si Archivo='ARCHIVO.TXT';
Código Delphi
[-]
...
ZipMaster.DLLDirectory := 'ARCHIVO.TXT';
ZipMaster.ZipFileName := 'ARCHIVO.TXT';
CreateDir('C:\WINDOWS\TEMP\ARCHIVO.TXT');
ZipMaster.ExtrBaseDir := 'C:\WINDOWS\TEMP\ARCHIVO.TXT';
...