Dá uma olhada no TStringList. Ele tem uma propriedade Delimiter que você
informará o ';' e depois basta capturar os trechos da linha.
Ex:
vObjString := TStringList.Create;
vObjString.Delimiter := ';';
vObjString.DelimitedText := 'AAA;BBB;CCC;DDD'
grupo1 := vObjString[0];
grupo2 := vObjString[1];
grupo3 := vObjString[2];
grupo4 := vObjString[3];
Luciano Calenzani Simões
Alguém conhece uma função do Delphi que retorne todas as strings depois
do ';', seria o seguinte:
na String ID;PRODUTO;CUSTO a função retornaria:
ID
PRODUTO
CUSTO
Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses
[As partes desta mensagem que não continham texto foram removidas]
