Delphi: enviando componentes para frente e para trás dos demais

Aproveite: os livros mais vendidos sobre tecnologia em Português

Problema: tenho quatro TPanel empilhados, ou seja, um sobre o outro. Ao clicar sobre um dos quatro, como faço para que ele apareça no topo da pilha?

Existe um método chamado BringToFront da classe TControl que faz parte da hierarquia da TPanel. Sua função é colocar o componente indicado na frente de todos os outros pertencentes ao mesmo Parent.

Exemplo:

Ao clicar no panel vermelho, o resultado é este:

O código para fazer isso é simples. Adicione no evento OnClick do panel desejado a seguinte linha:

1 Panel.BringToFront;

Para terminar, existe também o método SendToBack que faz exatamente o contrário do BringToFront: envia determinado componente para trás dos outros. A chamada é tão simples quanto a anterior.

É isso ae. Até +!