Meu caro Márcio, parece que entendi o que vc quis dizer.
Não sei se é possível fazer um typecast de um objeto para um inteiro(se
alguem souber, por favor, me corrija), assim não seria possível reuperar o
valor inteiro no objeto. Se eu fosse vc, criava um objeto para guardar este
inteiro, e usava este objeto.
Abs.
Daniel A. Bastos
Em 05/03/08, Walter Maldonado Junior <[EMAIL PROTECTED]> escreveu:
>
> Não sei se eu entendi o que vc pergunto, mas quando eu preciso ler o
> conteúdo da stringlist faço o seguinte
>
> For i := 0 to Lista.Count 1 do
>
> S := Lista.Strings[i]; // é o texto de índice i
>
> Espero ter ajudado
>
> Um abraço
>
> De: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> [mailto:
> delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>] Em
> nome de Marcio
> Enviada em: quarta-feira, 5 de março de 2008 11:38
> Para: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>
> Assunto: [delphi-br] [LER O CONTEUDO DE STRINGLIST - LISTAS]
>
> Amigos como faco para ler o conteudo de da lista ???
>
> procedure TForm1.Button5Click(Sender: TObject);
> var
> Lista: TStringList;
> N: Integer;
> S: String;
> I,V, Idx: Integer;
> Objeto : TObject;
> begin
> Lista := TStringList.Create;
>
> i := 0;
> while i < 10 do
> begin
> s := 'Alguma Coisa' + IntToStr(i);
> V := i * 1000;
> Lista.AddObject(s, TObject(V));
> i:= i + 1;
> end;
>
> Como Faco para ler o conteudo de uma lista ????
>
> // busca um objeto pelo identificador
> N := Lista.IndexOf('Alguma Coisa3');
> if N >= 0 then
> Objeto := Lista.Objects[N]
> else
> Objeto := nil;
>
> // atenção...
> // antes de destruir a lista de string, precisa destruir os objetos!
> for N := 0 to Lista.Count - 1 do
> Lista.Objects[N].Free;
> Lista.Free;
>
> end;
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> [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
