Abrir una aplicacion con un TButton

[dec]

Hola,

A ver si algo así te da alguna idea:

#include <Windows.hpp>
#include <ShellApi.hpp>

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  if (FileExists(Edit1->Text)) {
	ShellExecuteA(Handle,"open",Edit1->Text.c_str(),NULL,NULL,SW_SHOWNORMAL);
  } else {
	ShowMessage("Asegúrate de que existe el programa que quieres ejecutar");
  }
}