Remover quot;|quot; e Listar Lista de Varios ?
20/05/2008
0
Ex: tsstee|okokok|blz|noooo|hfhhhff|fhfhdshfg|..............
Como deu para ver é uma lista sem Limites então gostaria que ele fize-se automatico
alguém sabe ?
Warfighter
Posts
20/05/2008
Emerson Nascimento
var lista: TStringList; str: string; i: integer; begin str := ´ tsstee|okokok|blz|noooo|hfhhhff|fhfhdshfg´; lista := TStringList.Create; lista.Delimiter := ´|´; // define o delimitador lista.DelimitedText := str; // atribui o texto for i := 0 to lista.count-1 do ShowMessage(lista[i]) // exibe cada elemento, individualmente end;
20/05/2008
Warfighter
Obrigado[/b:c9b0730226] :wink:
var lista: TStringList; str: string; i: integer; begin str := ´ tsstee|okokok|blz|noooo|hfhhhff|fhfhdshfg´; lista := TStringList.Create; lista.Delimiter := ´|´; // define o delimitador lista.DelimitedText := str; // atribui o texto for i := 0 to lista.count-1 do ShowMessage(lista[i]) // exibe cada elemento, individualmente end;
04/07/2008
Warfighter
No caso as palavras existe espaços e com espaços elas estão sendo divididas e eu não quero que isso aconteça !!!
Como eu resolvo esse problemas usando esse codigo que o Emerson Posto ?
Abraços!!! :wink:
06/07/2008
Warfighter
Abraços;;;;;
06/07/2008
Warfighter
Abraços;;;;;
06/07/2008
Warfighter
Abraços;;;;;
07/07/2008
Joaoshi
Clique aqui para fazer login e interagir na Comunidade :)