Показать сообщение отдельно
Старый 18.01.2011, 00:47   #88
Местный
 
Аватар для J-Fobos
 
Регистрация: 09.06.2008
Сообщений: 867
Сказал Спасибо: 175
Имеет 468 спасибок в 259 сообщенях
J-Fobos пока неопределено
По умолчанию

Просто фразы "открыть файл" и "запустить программу" разные, вы спрашивали об открытии файла, я и дал ответ =)
Для запуска других программ используйте вызов функции из длл, вот пример подключения длл и вызова функции:

Код:
var
  lib:Integer;
  Res:variant;
begin
  lib := loadLibrary('User32.dll');
  Res := CallFunction(lib,'GetDC',1,[0]);
  CallFunction(lib,'ReleaseDC',2,[0,Res]);
  FreeLibrary(lib);
end.
__________________

В любом из нас спит гений. И с каждым днем все крепче.

Переходим на протокол нового поколения jabber
J-Fobos вне форума   Ответить с цитированием