[firebase-br] RES: OFF-Toppic - Delphi - Função SplitString

[Rodinei Amorim]

TStringList, consegue resolver isto para voce.

-----Mensagem original-----
De: lista <lista-bounces em firebase.com.br> Em nome de Henrique Ribeiro
Enviada em: quinta-feira, 13 de dezembro de 2018 17:23
Para: FireBase <lista em firebase.com.br>
Assunto: [firebase-br] OFF-Toppic - Delphi - Função SplitString

Boa tarde colegas,

Desde já, eu agradeço qualquer tipo de ajuda que possam me dar.
Muito obrigado mesmo.

No Delphi 7 (única versão que tenho) não existe a função "SplitString" que existe em versões superiores.

Estou tentando resolver uma situação mas estou meio perdido porque acabo gerando resultados inesperados.

É referente a rotina de leitura de uma string com dados de boletos que gerei.
Vou compartilhar com vocês:

Na string abaixo:

##OK*|*|2*|*|##OK*|*|1*|00000000000000000000000000000000000000000000000*|
https://nam05.safelinks.protection.outlook.com/?url=https%3A%2F%2Ffaturas.iugu.com%2F41e48012-45f1-47d2-8ad9-c5751e9e8075-ab5f*%7C41E4801245F147D28AD9C5751E9E8075%25%25OK*%7C*%7C2*%7C00000000000000000000000000000000000000000000000*%7Chttps%3A%2F%2Ffaturas.iugu.com%2Fb761961a-fd83-4dd8-976c-e5689c507019-511c*%7CB761961AFD834DD8976CE5689C507019%25%25OK*%7C*%7C3*%7C00000000000000000000000000000000000000000000000*%7Chttps%3A%2F%2Ffaturas.iugu.com%2F7be4f119-5d2e-41fd-b0d9-42951c0d54f2-88ba*%7C7BE4F1195D2E41FDB0D942951C0D54F2%25%25OK*%7C*%7C4*%7C00000000000000000000000000000000000000000000000*%7Chttps%3A%2F%2Ffaturas.iugu.com%2F51221b70-0e4d-47b9-a5f5-60676302b145-cbd9*%7C51221B700E4D47B9A5F560676302B145%23%23&data=02%7C01%7C%7C885ebbc932b84d99dddc08d661286b70%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636803223566812484&sdata=kqu0pJSyRzsKxXoQjx%2Bwbqy4zd1fNyVSVdPFuSEMLNM%3D&reserved=0

Eu preciso:
1- efetuar um Split por ##
2 - vai retornar um array com 4 itens
2.1 - o primeiro e o último vou descartar, pq estão vazios
2.2 - o segundo são os dados da fatura
2.3 - o terceiro dos boletos
6 - com o de boletos, efetuar outro Split por "$$"
7 - se tiver mais de um boleto, como no caso acima, vai gerar um array com cada um dos boletos
7.1 - tendo mais de um boleto, preciso executar outro Split por "*|" pra pegar os itens

Muito obrigado novamente.
Desejo sucesso e prosperidade a todos vocês.

Att,
Henrique

Graça a vós e paz da parte daquele que é, e que era, e que há de vir (Apocalipse
1:4 <https://nam05.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.bibliaonline.com.br%2Facf%2Fap%2F1%2F4%2B%23v4&data=02%7C01%7C%7C885ebbc932b84d99dddc08d661286b70%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636803223566812484&sdata=MeeaBfQwP3y2DyGSeaXERtUIEl0ZzdbgZlExbSw75fc%3D&reserved=0>).
Pois ainda em bem pouco tempo aquele que há de vir virá, e não tardará.  (Hebreus
10:37) <https://nam05.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.bibliaonline.com.br%2Facf%2Fhb%2F10%2F37%2B%23v37&data=02%7C01%7C%7C885ebbc932b84d99dddc08d661286b70%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636803223566812484&sdata=S2oeWQ0tUZDg5Nm1XAxIgXll%2BSVwLl0%2BkjOTWauKoWA%3D&reserved=0>
______________________________________________
FireBase-BR (https://nam05.safelinks.protection.outlook.com/?url=www.firebase.com.br&data=02%7C01%7C%7C885ebbc932b84d99dddc08d661286b70%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636803223566812484&sdata=1QMZETmo6himhRWapoXoEGincKY8BClbyGqqhbmEkN0%3D&reserved=0) - Hospedado em https://nam05.safelinks.protection.outlook.com/?url=www.locador.com.br&data=02%7C01%7C%7C885ebbc932b84d99dddc08d661286b70%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636803223566812484&sdata=0rc4ge54IBaoSHatQbTPfMrwrdhEvE8QK6B5BGmSm%2F0%3D&reserved=0
Para saber como gerenciar/excluir seu cadastro na lista, use: https://nam05.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.firebase.com.br%2Ffb%2Fartigo.php%3Fid%3D1107&data=02%7C01%7C%7C885ebbc932b84d99dddc08d661286b70%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636803223566812484&sdata=MRm5pjHPzyu8PItCTQmCl1j01TSEWf%2F0m5WK1Q4UIZA%3D&reserved=0
Para consultar mensagens antigas: https://nam05.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.firebase.com.br%2Fpesquisa_lista.html&data=02%7C01%7C%7C885ebbc932b84d99dddc08d661286b70%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636803223566812484&sdata=5tPCYyUEDS4FdgfU0r4xIgiaNInN2MmptBaxplSK83I%3D&reserved=0