Como criar um executável para abrir um jar? – Show Delphi

DICAS

Visite a biblioteca de dicas da comunidade.

Saiba mais

ARTIGOS

Abordagens detalhadas sobre assuntos diversos.

Saiba mais

INICIANTES

Aprenda a programar de um modo simples e fácil.

Saiba mais

DOWNLOADS

Acesse os materiais exclusivos aos membros.

Saiba mais
voltar

PARA QUEM GOSTA DE DELPHI

Como criar um executável para abrir um jar?

 

Você pode criar um aplicativo console e utilizar o ShellExecute para através
de seu exe abrir um jar.

Exemplo:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
program ExeToken;
 
{$APPTYPE CONSOLE}
 
{$R *.res}
 
uses
  Winapi.ShellAPI, VCL.Forms, System.SysUtils, Winapi.Windows;
 
begin
  { Handle da aplicação,
    Instrução, open para abrir,
    Arquivo a ser aberto,
    parâmetros para a chamada do arquivo (exe, jar, etc),
    Diretório, geralmente informo nil,
    Formato da janela: normal, maximizada, minimizada, oculta e etc }
  ShellExecute(Application.Handle, 'open',
  PChar(ExtractFilePath(Application.ExeName) + 'seujar.jar'),
  nil, nil, SW_SHOWNORMAL);
end.
Facebook Comments

Posts Relacionados

  • Administrador
  • 521 views
  • 0 comentários
  • 16 de março de 2015

Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

Ir ao topo

© 2016 Infus Soluções em Tecnologia - Todos os Direitos Reservados