Var
(pública)
VOLTA : string;
On exit das edits
(carga de VOLTA com a edit que a carregou)
exemplo para edit2:
VOLTA := 'Edit2.Text';
....
On exit de algum evento:
If VOLTA = 'Edit1.Text' then
Edit11.Text := 'Conteúdo de volta é Edit1.text');
If VOLTA = 'Edit2.Text' then
Edit12.Text := 'Conteúdo de volta é Edit2.text');
If VOLTA = 'Edit13.Text' then
Edit3.Text := 'Conteúdo de volta é Edit3.text');
Pergunto aos colegas, como fazer isto de forma mais elegante....? isto
é sem cases e ifs
Roberto
--------------------------------------------------------------------------------
Aqui na Oi Internet você ganha ou ganha. Além de acesso grátis com
qualidade, ganha contas ilimitadas de email com 1 giga cada uma. Ganha
espaço ilimitado para hospedar sua página pessoal. Ganha flog, suporte
grátis e muito mais. Baixe grátis o Discador em
http://www.oi.com.br/discador e comece a ganhar.
Agora, se o seu negócio é voar na internet sem pagar uma fortuna,
assine Oi Internet banda larga a partir de R$ 9,90. Clique em
http://www.oi.com.br/bandalarga e aproveite essa moleza!
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
