Inserir texto no componente focado

Delphi

12/11/2003

Tenho um Form_geral que é chamado po vários outros forms, quando esse form_geral é chamado por um dos forms e no form_geral digito alguma coisa num edit e fecho o form_geral, gostaria que o componente que estava c/ o foco (por exemplo um dbedit) recebesse o valor do edit do form_geral.

[b:f2a5d4840b]Não quero ter que fazer :[/b:f2a5d4840b]

if Assigned(form1) then
form1.DBEdit.text := form_geral.text
else if Assigned(form2) then
form2.DBEdit.text := form_geral.text

Gostaria que o DBEdit de qualquer form receba o conteúdo do edit do form_geral, se tem que especificar o nome do form e o nome do DBEdit.

Obrigado.


Andreyrf

Andreyrf

Curtidas 0
POSTAR