Yo seguí el mismo tutorial y sólo con tu código logré dar en el clavo.
Un modesto aporte para quien le interese:
Si en la propiedad OnProgress de ZipMaster añadimos el siguiente código:
Código Delphi
[-]procedure TForm1.ZipMaster1Progress(Sender: TObject; Details: TZMProgressDetails);
begin
ProgressBar1.Position := Details.TotalPerCent;
Application.ProcessMessages;
end;
Podemos ver la progresión de la compresión del archivo o carpeta seleccionada, en un ProgressBar.
Saludos y muchas gracias