Fórum Pegar nome do executável #418772
20/06/2012
0
Gentem, estou precisando de uma ajuda.
Estou tentando criar um executável em delphi onde o mesmo me mostre o nome do executável.
eu coloco um TopenDialog para abrir e localizar o executável.
Em um Edit registro todo o caminho, por exemplo: C:\Program Files\7-Zip\SevenZip.exe.
Gostaria de um método para pegar somente o SevenZip.exe do caminho C:\Program Files\7-Zip\SevenZip.exe.
Alguma sugestão?
Fábio Sela
Curtir tópico
+ 0Posts
20/06/2012
Marco Salles
Porém com expressões Regulares vc deve conseguir isto de modo mais atual
utilize a função function StrRight(psTexto: string; pcChar:Char):string;
ver em
http://marcosalles.wordpress.com/2012/03/11/expressoes-regulares-regularexpressions-in-delphi-tregex/
dar uses a RegularExpressions
e para utilizar faça
Showmessage(StrRight(edit1.text,/));
Gostei + 0
20/06/2012
Marco Salles
Ou restou alguma dúvida ???
Era isto mesmo que vc queria ou não ??
Gostei + 0
20/06/2012
Imex
Experimente utilizar a função ExtractFileName mais ou menos desta forma:
ShowMessage( ExtractFileName(edtNomeDoArquivo.Text) );
Espero que ajude.
Gostei + 0
20/06/2012
Fábio Sela
[Error] untNomedaAplicacao.pas(40): ; expected but . found
Gostei + 0
20/06/2012
Fábio Sela
Obrigado, topico encerrado.
Gostei + 0
20/06/2012
Fábio Sela
Obrigado, topico encerrado.
Gostei + 0
20/06/2012
Fábio Sela
Obrigado, topico encerrado.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)