Panel - BringToFront
Pessoal estou com o seguinte problema:
Tenho vário Panel´s (um Sobre o Outro) e dentro deles tenho vários
componentes.
Preciso saber em qual componente está o Foco. E ai mandar o PANEL que
contém esse componente com Foco pra frente.
Alguém tem uma idéia?
Tenho vário Panel´s (um Sobre o Outro) e dentro deles tenho vários
componentes.
Preciso saber em qual componente está o Foco. E ai mandar o PANEL que
contém esse componente com Foco pra frente.
Alguém tem uma idéia?
Cristiano Alves
Curtidas 0
Respostas
Paullsoftware
02/06/2006
Uma boa solução para o seu problema seria mudar de componente e usar o TNotebook da paleta Win3.1 (Delphi 7)
GOSTEI 0
Cristiano Alves
02/06/2006
infelizmente não posso fazer. Sei que há um jeito, pensei em contar com os componentes no Form, e verificar o [b:e98540ed76]FOCUSED[/b:e98540ed76] dai pegar o [b:e98540ed76]PARENT[/b:e98540ed76] desse componente com focu desse modo terei o panel. Mas não consegui implementar isso ainda.
Mas obrigado pela anteção
Mas obrigado pela anteção
GOSTEI 0
Marco Salles
02/06/2006
Consegui resolver!
Obrigado pessoal!
Pra quem ficou na curiosidade ai está:
var i:Integer;
begin
for i := 0 to pred(ComponentCount) do
begin
if Components[I] is TWinControl then
if (Components[I] as TWinControl).Focused then
TPanel(TWinControl(Components[i]).Parent).BringToFront;
end;
end;
Se alguém tiver alguma idéia melhor estou ai pra ouvi-las
[]s e obrigado
GOSTEI 0