Ler o conteúdo do que ?
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Marcio Enviada em: quarta-feira, 5 de março de 2008 11:38 Para: delphi-br@yahoogrupos.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]
