Buscar

Como executar programas externos ao delphi

Código

//Crie uma aplicação, adicione ao Form dois botões. O botão 1 abrirá o Windows Explorer, enquanto o botão 2 abrirá o Campo Minado.//

procedure TForm1.Button1Click(Sender: TObject);
begin
  WinExec('C:WINDOWSexplorer.exe', SW_SHOW);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  WinExec('C:WINDOWSsystem32winmine.exe', SW_SHOW);
end;

 

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%

Detalhes da dica

Categoria: Componentes
Adicionada dia: 31/10/05
Por: Victor Roberto
Visualizada: 3486 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009