Vinícius,

  Acho que esse exemplo resolve seu problema:

  var
    t1, t2, t3, t4, teste, outro, variavel3: string;

    lstVars: TStringList;
    i: Integer;
    p: ^String;

begin
  t1 := 't';
  t2 := '3';
  t3 := '50';
  variavel3 := 'Valor da variavel3';
  teste := 'variavel';

  lstVars := TStringList.Create;
  lstVars.AddObject('t1', @t1);
  lstVars.AddObject('t2', @t2);
  lstVars.AddObject('t3', @t3);
  lstVars.AddObject('variavel3', @variavel3);
  lstVars.AddObject('teste', @teste);

  i := lstVars.IndexOf('t3');
  if (i > -1) then
  begin
    p := Pointer(lstVars.Objects[i]);
    t4 := p^;
  end else
    t4 := '';

  i := lstVars.IndexOf(teste + t2);
  if (i > -1) then
  begin
    p := Pointer(lstVars.Objects[i]);
    outro := p^;
  end else
    outro := '';

  ShowMessage('teste + t2 = "' + Outro + '" e t4 = "' + t4 + '"');
  lstVars.Free;
end;

  Espero que tenha ajudado.


  Nielsen

On Fri, 17 Sep 2004 18:42:20 -0000, vinicius_mom
<[EMAIL PROTECTED]> wrote:
> Acho que vc não entendeu o que eu to querendo.. Vamos seguir o que vc
> escreveu:
> 
> valor := teste + outro;
> 
> O valor da variavel valor vai ser 'variavel3' certo?!?!
> 
> Pois então, como fazer para pegar o valor da variavel3 mas utilizando
> o que tenho na variavel valor?
> 
> Se eu mandar mostrar o conteudo de valor vai me mostrar 'variavel3'
> mas eu queria que me mostrasse 'Valor da variavel3'
> 
> Entendeu?!?! Não sei se consegui explicar bem o que eu queria
> 
> []s
> 
> Vinicius
> 
> --- Em [EMAIL PROTECTED], "Luciano R. Machado"
> <[EMAIL PROTECTED]> escreveu
> 
> 
> >
> > valor := teste + outro;
> >
> > Atente para os dois pontos antes do = e o ; no final do comando.
> >
> > --
> > Luciano Rodrigues Machado
> > Programador - Ribeirão Preto-SP
> >
> > Vinicius Mommensohn wrote:
> >
> > > Olá pessoal,
> > >
> > > To com essa dúvida jah algum tempo e agora to precisando saber
> pra poder
> > > resolver um problema aqui:
> > >
> > > Vamos supor:
> > >
> > > var
> > >     teste, outro, variavel3: string;
> > >
> > > begin
> > >     variavel3 := 'Valor da variavel3';
> > >
> > >     teste := 'variavel';
> > >     outro := '3';
> > >
> > > end;
> > >
> > > Tem como eu juntar essas duas para pegar o valor da variavel 3???
> > >
> > > Coisa do tipo ShowMessage(teste + outro) que me iria retornar uma
> caixa
> > > com os dizeres 'Valor da variavel3'?
> > >
> > > No php seria coisa do tipo
> > >
> > > $valor = $teste . $outro
> > >
> > > echo $$valor;
> > >
> > > Um abraço a todos,
> > >
> > > Vinicius
> > >
>


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

 



Responder a