Usa assim:
ExtractStrings(['\'], [' '], PChar(String_Caminho), TStrings_Pastas);

Onde String_Caminho é a string completa do caminho e
TStrings_Pastas é um stringlist, onde vai ficar armazenado as strings.

Eduardo.


  ----- Original Message ----- 
  From: Lucas 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 24, 2007 4:35 PM
  Subject: [delphi-br] Desmembrar string


  Preciso desmembrar o caminho de pastas de arquivos, exemplo:
  tenho uma string com "\pasta1\arquivos\dados"
  preciso separar isto em 3 strings:
  pasta1
  arquivos
  dados

  lembrando que não da pra usar o copy porque os nomes das pastas podem
  ser de varios tamanhos. Alguém tem uma dica?
  Desde ja agradeço.

  Lucas.



   

[As partes desta mensagem que não continham texto foram removidas]

Responder a