Jump to content
Fórum Script Brasil
  • 0

(Resolvido) Obter nome da Aplicação


junior103

Question

4 answers to this question

Recommended Posts

  • 0

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

Link to post
Share on other sites
  • 0
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

Link to post
Share on other sites
  • 0

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



  • Forum Statistics

    • Total Topics
      148893
    • Total Posts
      644913
×
×
  • Create New...