Elazar, Deu tudo certinho,
exatamente como vc explicou, eu é que estava com os eventos mal posicionados
Grande abraço e obrigado.
Roberto
----- Original Message -----
From: Roberto Wazen (RJ)
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 29, 2006 5:35 PM
Subject: Re: [delphi-br] Conteúdo da string (virar) componente emtempo de
execução
Elazar,
O setfocus deu certo, foi para a célula (edit) correto.
Mais o problema é que não quero o foco e sim enviar para a celula o conteúdo
do calculo
If oVolta <> nil then begin
// oVolta := uVolta; se eu conseguisse fazer isto, Igualar os tipos
daria certo)
// da forma que esta em baixo, só vai para o primeiro edit e não para o
que deu origem
oVolta.text := edtResultato.Text;
End;
vou ver se repito o enunciado do problema, visto vc estar quase chegando na
solução:
tenho alguns edits edit1, edit 2,,, edit 3
escolho um deles (edit2) e coloco uma fórmula exemplo =3+4
o sender envia para um avaliador que joga o resultado em edtResultado.text
// até aqui funciona belezinha
Falta agora pegar o resultado e enviar para edit2.text := edtResultado;
O difícil é jogar para o edit2.text , sem usar Ifs, é claro.
Será que expliquei;;;
Roberto
----- Original Message -----
From: Elazar Dornelles Ceza
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 29, 2006 5:06 PM
Subject: RES: [delphi-br] Conteúdo da string (virar) componente emtempo de
execução
Ok;
Complementando o seu codigo então.
{ Tenha declarado então duas variaveis globais }
Var
vVolta : String;
oVolta : TEdit;
{No on exit do seus Tedits; voce coloca o seguinte. }
vVolta := 'Conteudo de volta é ' + Tedit(Sender).Name + '.Text';
oVolta := Tedit(Sender);
{ no comando que voce disse que vai fazer voltar para o outro
edit anterior se coloca }
If oVolta <> nil then begin
oVolta.SetFocus;
End;
{ Não testei mas acho que rola assim }
Atenc.
Elazar;
-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Roberto Wazen (RJ)
Enviada em: terça-feira, 29 de agosto de 2006 14:57
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Conteúdo da string (virar) componente emtempo
de execução
Elazar, obrigado pela resposta, entretanto, vc respondeu a primeira
parte da pergunta, que é carregar em VOLTA conforme o onexit de qualquer
uma das edits.
Fico ainda em dúvida, como vou retornar para a edit ( a que carregou
Volta) com um resultado que foi obtido em outro evento.
Tipo planilha, dados de uma célula (edits) vão para o cálculo e depois
voltam para aquela mesma célula.
Será que vou ter que usar ponteiros?
Roberto
----- Original Message -----
From: Elazar Dornelles Ceza
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 29, 2006 2:11 PM
Subject: RES: [delphi-br] Conteúdo da string (virar) componente
emtempo de execução
Coloca no onexit o seguinte
Volta := 'Conteudo de volta é ' + Tedit(Sender).Name + '.Text';
Atenc.
Elazar
-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de [EMAIL PROTECTED]
Enviada em: terça-feira, 29 de agosto de 2006 11:21
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Conteúdo da string (virar) componente emtempo de
execução
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!
_______________________________________________________
O Yahoo! está de cara nova. Venha conferir!
http://br.yahoo.com
[As partes desta mensagem que não continham texto foram removidas]
_______________________________________________________
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular.
Registre seu aparelho agora!
http://br.mobile.yahoo.com/mailalertas/
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< 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
