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] -- <<<<< 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