Copy()

[leoprofessor 0]

Tenho uma string que armazena o caminho com o nome do arquivo:sNomeArquivo := c:\LEO\transmissao\METAR25072007085833.MSGcomo faço pra pegar só o nome do arquivo?quero só o METAR25072007085833.MSGALGUEM PODE ME AJUDAR?

[Rodrigo Miss 1]

opa!

beleza kra?

uma opcao é fazer um laço for:

 

var   i: Byte;   S,Str: string; begin    Str:= Edit1.Text;   S:= '';    for i:= Length(Str) downto 1 do   begin	 if (Str[i] = '\') then	 begin	   Break;	 end;	 S:= Str[i] + S;   end;    showmessage(s););

[Hugo Slepicka 0]

Para extrair apenas o nome use:

ExtractFileName('c:\LEO\transmissao\METAR25072007085833.MSG');

Exemplo:

Showmessage(ExtractFileName('c:\LEO\transmissao\METAR25072007085833.MSG'));

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[leoprofessor 0]

valeu Hugão!

[Hugo Slepicka 0]

Beleza brow... http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif