O próprio strinlist tem uma propriedade, Delimiter. Nela você cita qual o 
delimitador da string, depois você "pega" o valores em vObjString[0], 
vObjString[1], vObjString[N].

Assim:

vObjString.Delimiter := ',';
vObjString.DelimitedText := 'teste,teste,teste';
a := vObjString[0];
b := vObjString[1];
c := vObjString[2];


Luciano C. Simões

--- Em delphi-br@yahoogrupos.com.br, Evaldo <evaldoave...@...> escreveu
>
> Delphi tem alguma função explode nativa?
> ou vou ter que implementar?
> 
> por exemplo:
> 
> A string:
> str := teste,teste,teste,teste
> explode(str,',');
> 
> retorna uma stringlist:
> teste
> teste
> teste
> tese
> 

Responder a