Função ou procedure pra alinhar TgroupBox!

Galera vou tentar explicar ...


tenho 10 TGroupBox em sequencia tipo:

[b:9e5a683fe3]Grupo1
Grupo2
Grupo3
Grupo4
Grupo5
Grupo6
Grupo7
Grupo8
Grupo9
Grupo10[/b:9e5a683fe3]

No menu quando é selecionado Grupo1 por exemplo no [b:9e5a683fe3]onclick[/b:9e5a683fe3] dele é colocado então:

[b:9e5a683fe3]Grupo1.align := alclient;
Grupo1.visible := true;

Grupo2.visible := false;
Grupo3.visible := false;
Grupo4.visible := false;
Grupo5.visible := false;
Grupo6.visible := false;
Grupo7.visible := false;
Grupo8.visible := false;
Grupo9.visible := false;
Grupo10.visible := false;[/b:9e5a683fe3]

Beleza imaginem caso eu queira selecionar o Grupo3 eu teria que colocar novamente este imenso comando e caso eu tenha que criar mais grupos vai ficar muito ruim de controlar.
Gostaria de escrever uma procedure e/ou function que me ajuda-se escrevia uma vez e sempre que fosse colocar um evento no onclick de um botão do menu ficaria algo tipo: [b:9e5a683fe3]Function AlinhaGrupos([color=red:9e5a683fe3]Grupo3[/color:9e5a683fe3]);[/b:9e5a683fe3] entendem ?
So que não estou conseguindo fazer poderiam me ajudar ?


Muito Obrigado
:D



[b:9e5a683fe3][color=red:9e5a683fe3]Título alterado pelo Moderador oTTo. Removido: ´TgroupBox ..´[/color:9e5a683fe3][/b:9e5a683fe3]

:idea: Favor leia as regras de conduta.