[lmikle]

Лучще ShellExecute:

Код:

  If ShellExecute(Application.Handle,
                  PChar('open'),
                  PChar(AUrl),  // <-- Запускаемый файл
                  Nil,
                  Nil,
                  SW_SHOW) <= 32 Then
    MessageDlg(msgErrorOpenUrl,mtError,[mbOK],0);