Открытие файла

[Veiron]

Как сделать так что бы заданный файл открылся как при реальном щелчке мыши без указания чем открыть файл и параметрами?
Когда то достигалось компонентом TShell (Shell1.Open('...')), но теперь он что то перестал работать...

[mihali4]

А ShellExecute чем-то не устраивает?
Примеры:
// Запуск файла
ShellExecute(Handle, nil, 'c:\windowscalc.exe', nil, nil, SW_SHOW);

// Просмотр каталога
ShellExecute(Handle, nil, 'c:\windows', nil, nil, SW_SHOW);

// Открытие сайта в браузере
ShellExecute(Handle, nil, 'http://www.site.ru', nil, nil, SW_SHOW);

// Посылка E-mail
ShellExecute(Handle, nil, 'mailto:DelphiWorld@mail.ru', nil, nil, SW_SHOW);

//Открытие текстового файла
ShellExecute(Handle, nil, 'c:\a.txt', nil, nil, SW_SHOW);

[Veiron]

Спасибо, савсем про него забыл