(Resolvido) Obter nome da Aplicação

[junior103]

Bom dia . Como faço para obter o nome da minha aplicação pelo delphi berlin firemonkey?

 

[Jhonas]

exemplo:
 

procedure TForm1.Button1Click(Sender: TObject);
var prog, dir, tit, caminho : string;
begin

   Prog := UpperCase(ExtractFileName(Application.ExeName));
   showmessage(Prog);
   Dir := ExtractFilePath(Application.ExeName);
   showmessage(Dir);
   Tit := Application.Title;
   showmessage(Tit);
   Caminho := Application.ExeName;
   showmessage(Caminho);

end;

abraço

[junior103]

4 horas atrás, Jhonas disse:

exemplo:
 

procedure TForm1.Button1Click(Sender: TObject);
var prog, dir, tit, caminho : string;
begin

   Prog := UpperCase(ExtractFileName(Application.ExeName));
   showmessage(Prog);
   Dir := ExtractFilePath(Application.ExeName);
   showmessage(Dir);
   Tit := Application.Title;
   showmessage(Tit);
   Caminho := Application.ExeName;
   showmessage(Caminho);

end;

abraço

Boa trde. Eu preciso do nome da Aplicativo compilado pra android. Tem algum exemplo de como. Estou usando delphi berlin

[Jhonas]

veja se é isso

http://blog.atlabs.com.br/2014/10/dlephi-pegar-handle-da-aplicacao-pelo.html

http://escoladeandroid.blogspot.com.br/2012/04/android-obter-nome-e-versao-do.html

abraço

 

[junior103]

17 horas atrás, Jhonas disse:

veja se é isso

http://blog.atlabs.com.br/2014/10/dlephi-pegar-handle-da-aplicacao-pelo.html

http://escoladeandroid.blogspot.com.br/2012/04/android-obter-nome-e-versao-do.html

abraço

 

 

Solução android e ios https://stackoverflow.com/questions/27020930/how-to-get-application-idpackage-modulename-delphi-xe5-xe6-xe7