Source Abrindo o *********** sem o Launcher

[RafaelMcd]

Para os que ficaram me perturbando, dizendo que não era necessário ter criado um Launcher No Check, que tinha meios muito mais simples de se abrir o *********** sem o launcher, tá aí o que vocês queriam. Não usei esse método porque é muito mais legal criar um Launcher No Check.
O tutorial é MUITO fácil. Não é nada avançado.

Antes de tudo, declare ShellApi na seção Uses. Desse jeito:

Abaixo de {$R *.dfm}, cole este procedimento:

procedure OpenPB;
Const Arquivo: PChar = '**********.exe';
begin
if FileExists(Arquivo) then
ShellExecute(0, 'open', Arquivo, '1189021769949261133', PChar(GetCurrentDir), SW_SHOWNORMAL)
else
MessageBox(0, Pchar('Arquivo "'+Arquivo+'" não encontrado!'), 'Erro!', MB_ICONERROR+MB_OK);
end;

Ficando assim:

Agora você só precisa chamar esse procedimento. Para chamar é bem fácil: OpenPB;
Nesse tutorial eu vou chamar através do evento OnClick de um botão. (Ao clicar no botão o código será executado.)
Arraste um botão até seu formulário e dê 2 clicks rápidos nele.

Vai ser criado isso no código do seu programa:

procedure TForm1.Button1Click(Sender: TObject);
begin

end;

Cole o OpenPB; entre o begin e o end. Ficando assim:

Depois é só compilar e colocar na pasta do ***********.
Isso é muito importante: Ele ele só vai rodar se estiver dentro da pasta do seu ***********. Eu poderia melhorar o código usando um OpenDialog, mas achei desnecessário. É muito mais simples arrastar ele logo para pasta do *********** e criar um atalho para o Desktop. O código não está muito bom, mas funciona perfeitamente.

 

[Ehrmantraut]

Sinceramente não precisa criar um projeto, é só criar um atalho do **********.exe na área de trabalho, botão direito no atalho->Propriedades->Destino e logo na frente do destino coloque 2554125451656341 ou qualquer outro número grande, de salvar e já era só abrir o ** direto no atalho na área de trabalho.
Exemplo de como irá ficar: C:\ongame\**********\**********.exe 2554125451656341

 

[RafaelMcd]

Sinceramente não precisa criar um projeto, é só criar um atalho do **********.exe na área de trabalho, botão direito no atalho->Propriedades->Destino e logo na frente do destino coloque 2554125451656341 ou qualquer outro número grande, de salvar e já era só abrir o ** direto no atalho na área de trabalho.
Exemplo de como irá ficar: C:\ongame\**********\**********.exe 2554125451656341

Fica ai a alternativa kkkkk