Fechando a porta 80 / 8080

Como fasso para fechar a porta via sockte. Como 80 ou 8080.
Quero fechar esta portas e abrilas quando eu quizer..

Desde já muito o brigado pela atenção

[color=green:559c3225aa]Movido de Administração de Lan Houses para Delphi[/color:559c3225aa]