Nome do componente
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
Curtidas 0
Respostas
Firekiller
25/10/2005
você pode fazer assim, no evento OnEnter destes componentes você coloca:
Label1.Caption := TComponent( Sender ).Name;
Label1.Caption := TComponent( Sender ).Name;
GOSTEI 0
Sistemald
25/10/2005
Com esse código você pegará o nome do componente
Label1.caption:= screen.ActiveControl.Name;
GOSTEI 0
Sistemald
25/10/2005
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!
GOSTEI 0