Fórum Nome do componente #300566
25/10/2005
0
Galera,
gostaria de saber como posso capturar o nome do componente em que está o foco.
ex:
Quando o foco for para um componente (edit,dbedit,combo, etc...) gostaria que o nome desse componente aparecesse em um label.
Alguém sabe como fazer isso?????
gostaria de saber como posso capturar o nome do componente em que está o foco.
ex:
Quando o foco for para um componente (edit,dbedit,combo, etc...) gostaria que o nome desse componente aparecesse em um label.
Alguém sabe como fazer isso?????
Demetrius
Curtir tópico
+ 0
Responder
Posts
25/10/2005
Firekiller
você pode fazer assim, no evento OnEnter destes componentes você coloca:
Label1.Caption := TComponent( Sender ).Name;
Label1.Caption := TComponent( Sender ).Name;
Responder
Gostei + 0
25/10/2005
Sistemald
Com esse código você pegará o nome do componente
Label1.caption:= screen.ActiveControl.Name;
Responder
Gostei + 0
25/10/2005
Sistemald
Declare esta Procedure:
na sua procedure coloque a resposta anterior como os comando dela.
No on create do form declare
não testei mas deve funcionar!
procedure ScreenActiveControlChange(Sender: TObject);
na sua procedure coloque a resposta anterior como os comando dela.
No on create do form declare
Screen.OnActiveControlChange := ScreenActiveControlChange;
não testei mas deve funcionar!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)