Fórum Name #290138
31/07/2005
0
Como posso saber o nome do componente que está com o setfocus
varnomedocomponentee := ;
varnomedocomponentee := ;
Zlink
Curtir tópico
+ 0
Responder
Posts
01/08/2005
Catunda
Pode incluir o codigo abaixo em um botão por exemplo.
var
I : Integer;
varnomedocomponentee : String;
begin
for I:= 0 to ControlCount -1 do
begin
if Controls[I] is TWinControl then
if (Controls[I] as TWinControl).Focused then
varnomedocomponentee := (controls[i].Name);
end;
end;
var
I : Integer;
varnomedocomponentee : String;
begin
for I:= 0 to ControlCount -1 do
begin
if Controls[I] is TWinControl then
if (Controls[I] as TWinControl).Focused then
varnomedocomponentee := (controls[i].Name);
end;
end;
Responder
Gostei + 0
01/08/2005
Zlink
Valeu, muito
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)