subject:"\\\[delphi\\\-br\\\] Conteúdo da string \\\(virar\\\) c omponente emtempo de execução"

Re: [delphi-br] Conteúdo da string (virar) c omponente emtempo de execução

2006-08-29 Por tôpico Roberto Wazen \(RJ\)

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]



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

Re: [delphi-br] Conteúdo da string (virar) c omponente emtempo de execução

2006-08-29 Por tôpico Roberto Wazen \(RJ\)

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:

Re: [delphi-br] Conteúdo da string (virar) c omponente emtempo de execução

2006-08-29 Por tôpico Roberto Wazen \(RJ\)

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

Re: [delphi-br] Conteúdo da string (virar) c omponente emtempo de execução

Re: [delphi-br] Conteúdo da string (virar) c omponente emtempo de execução

Re: [delphi-br] Conteúdo da string (virar) c omponente emtempo de execução

3 matches

Site Navigation

Mail list logo

Footer information