manipular string ?

Question

galera � o seguinte tenho um txt com varios e-mails separados por ; so q tenho que carregar um listbox com os e-mail tipo assim
no txt ta assim
tes1@uol.com.br;tes2@uol.com.br

i no listbox tem q ficar assim
tes1@uol.com.br
tes2@uol.com.br

valew

Rjun · Answer

D� uma olhada em TStringList. Tem uma propriedade em que voc� define o caracter separador....

Guilherme · Answer

como q usa isso pq coloquei la tstringlist(memo1.text) da erro  :?  :?...

Massuda · Answer

Pelo que entendi, sua lista de emails est� num memo... use StringReplace para trocar o ponto-e-v�rgula por CR/LF e carregue no Items do Listbox. Ficaria algo assim...

ListBox.TExt := StringReplace(Memo1.Text, �;�, #1310, [rfReplaceAll]);

Guilherme · Answer

no lugar do ; substituiu por ||  :?  :?...

Massuda · Answer

Desculpe... onde est�...[code:1:d78e162c03]ListBox.TExt := ...[/code:1:d78e162c03]...coloque...[code:1:d78e162c03]ListBox.Items.Text := ...[/code:1:d78e162c03]...

Guilherme · Answer

vlw massuda deu certo !!!!!...

F�rum manipular string ? #290216