[Resolvido] Compactar para .Zip

Galera alguém sabe alguma maneira de compactar arquivos diretamente pas extensão ".Zip" pelo delphi sem eu ter a que instalar nenhum programa de compactação nem componentes de terceiros no meu delphi, caso não tiver nenhuma maneira qual componentes você'es me indicam para fazer isto.