Fórum Como posso saber o name do edit em tempo de execussao #211592
04/02/2004
0
Alguém sabe como posso saber o name do edit ou dbedit em tempo de execussão, ou melhor, o que quero fazer é quando passo com o mouse por cima de um dbedit ele traga um complemento daquela informação digitada, jogando em um label, pensei em fazer utilizando como um hint, mas jogando esta infrmação para o label, por exemplo: Digito o código do cliente e quando passo com o mouse sobre o dbedit do código ele aparece o nome do cliente, quando tiro o mouse ele apaga, mas vamos dizer que são vários códigos e vários dbedit, então quero fazer uma funçao que busque o nome do dbedit para ele fazer automaticamente a busca pelo nome, mas não tnho nem idéia como faço, alguém pode me ajudar?
Impactus
Curtir tópico
+ 0
Responder
Posts
04/02/2004
Skywalker
veja o exemplo ficticio abaixo:
procedure mudalabel(Sender: TObejct);
begin
if Sender is TDBEdit then
begin
Label1.Caption:= (Sender as TDBEdit).Text;
end;
end;
no evento do TDEdit1 coloque o seguinte
mudalabel(TDBEdit1);
no proximo da mesma forma.
procedure mudalabel(Sender: TObejct);
begin
if Sender is TDBEdit then
begin
Label1.Caption:= (Sender as TDBEdit).Text;
end;
end;
no evento do TDEdit1 coloque o seguinte
mudalabel(TDBEdit1);
no proximo da mesma forma.
Responder
Gostei + 0
04/02/2004
Nildo
Só mais uma coisa... Execussão é com ç: [b:498b882d86]Execução[/b:498b882d86]
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)