Подписаться на RSS рассылку
Главная » Статьи по Delphi » Файлы » Запустить любой файл

Запустить любой файл

Автор:

Tweet
Uses ShellAPI;
...
Var S : String;
S:='Путь к файлу';
ShellExecute(Handle,'open', PAnsiChar(S),nil,nil,SW_Normal);

Просмотров: 5272

Обсудить на форуме

0   Спам
(10.11.2011)
3. Макса
не любой файл... Если запускать сервер ява игры который основан на ядре JAVA и запускать файл в формате bat (стандарт). Он не запустит, но при этом его откроет, будет ошибка при запуске типо, ява может найти указанные файлы.
Чуть изменить код и вуаля всё работает.
Оно ток приложения может открыть

0   Спам
(26.06.2009)
2. small keds
спс женек помогло!

0   Спам
(24.01.2009)
1. Евгений (жека)
запустить файл из папки с проектом

procedure TForm3.N13Click(Sender: TObject);
var s:string;
begin
S:=ExtractFileDir(Application.ExeName)+'\1.txt';
ShellExecute(Handle,'open', PAnsiChar(S),nil,nil,SW_Normal);
end;

файл запускае



Имя *:
Email:


Код *:

Copyright © 2008 - 2018 Программирование на Delphi для начинающих и не только.

Полнота авторских прав на все материалы, опубликованные на сервере DelphiDevelop.ru принадлежит их авторам.

Перепечатка материалов разрешается с указанием авторства и гиперссылки на первоисточник информации.