Автор ЛЕНА ПОЛИКАРПОВА задал вопрос в разделе Другие языки и технологии
Как в делфи сделать открытие файла? и получил лучший ответ
Ответ от Jurii[гуру]
Reset(F) - открытие. Но это тебе не нужно!
Тебе нужно курить команду ShellExecute:
Функция ShellExecute
ShellExecute( hwnd: THandle, // указатель на родительское окно
lpOperation: PChar, //выполняемая операция
lpFile: PChar, // файл или папка
lpParameters: PСhar, //строка параметров запускаемой программы
lpDirectory: PChar, // директория по умолчанию
nShowCmd: integer // состояние окна запущенной программы
);
hwnd
Определяет родительское окно, которое будет получать сообщения от запускаемого приложения (например, об ошибке при запуске) .
lpOperation
Определяет выполняемую оперерацию.
"open" - открывает файл lpFile. Файл может быть документом, приложением или папкой.
"print" - печатает файл lpFile. Файл должен быть документом. Если передано приложение, то выполняются действия, аналогичные "open".
"explore" - открывает папку lpFile в проводнике Windows.
nil - аналогично "open".
lpFile
Файл или папка. Функция может открыть или напечатать файл, открыть папку, запустить приложение.
lpParameters
Если lpFile - приложение, то lpParametrs может содержать строку параметров приложения.
Если lpFile - документ или папка, lpParameters должен быть nil.
nShowCmd
Определяет как должно выглядеть окно запущенного приложения, приведу несколько основных констант, остальные можно посмотреть в Windows SDK.
Константа
Описание
SW_HIDEСкрывает окно.
SW_MAXIMIZEРазворачивает окно.
SW_MINIMIZEСворачивает окно.
SW_SHOWMAXIMIZEDАктивизирует и разворачивает окно.
SW_SHOWMINIMIZEDАктивизирует и сворачивает окно.
SW_SHOWNORMALАктивизирует и показывает окно в состоянии, определяемым самим приложением.
Примеры использования функции.
Открытие файлов через OpenDialog:
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
ShellExecute(Self.Handle, \'open\', PChar(OpenDialog1.FileName), nil, nil, SW_SHOWNORMAL);
end;
Открытие IE с заданным URL:
ShellExecute(Self.Handle, \'open\', \' ссылка\', nil, nil, SW_SHOWMAXIMIZED);
Запуск почтового клиента:
ShellExecute(Self.Handle, \'open\', \'mailto:vasya@mail.ru\', nil, nil, SW_SHOWNORMAL);
Примечание. Для использования ShellExecute в раздел uses надо добавить модуль ShellAPI.
var t:textfile; ... assignfile(t,'1.txt'); reset(t); readln(t,s); ... closefile(t); или же более нормальный вариант: str : TStringList; ... str : =TStringList.Create; str.LoadFromFile('1.txt'); ... s
это ж в школу нужно регулярно ходить, чтоб знать...
ищи по тегам ShellAPI..
Запускай через ShellExecute, подробный синтаксис в MSDN.
Delphi Mediaplayer
Трындец. Скачай справочник по языкам программирования - там все есть и очень просто !
подробнее...
как открыть текстовый файл в Delphi и сделать построчное чтение?
var
var f : TextFile; // объявлена файловая переменная f типа TextFile
begin
подробнее...
как запустить исходник delphi. как запустить исходник delphi 7?
записать на болванку вместе с самой delphi и запустить в окно
подробнее...
Как программно в Делфи7 очистить файл тхт?
var
st:tstringlist;
begin
st:=tstringlist.create;
st.savetofile('text.txt');
подробнее...
открыть файл EXCEL в проекте Delphi 7
Вместо абсолютного пути можно попробовать относительный
".файл"
точка - текущий каталог.
подробнее...
Delphi 7. открыть файл, а потом удалить его.
Вы запускаете торрент, он грузится (программа запускается, все такое) , допустим 5 секунд. А ваша
подробнее...
Какой прогой открыть файл с расширением "dsk"???
Смотря откуда этот файл взят.. .Если это файл из папки проекта , то это настройки рабочего стола
подробнее...
какой прогой открыть файл с расширением .db
Если это база данных, то откроется Excell в MsOffice(или Calc в OpenOffice) где его можно будет
подробнее...
Как открыть файл формата PAS ??
Для правки подойдёт любой текстовый редактор, для запуска перетащи файл на ярлык паскаля ..далее
подробнее...
С помощью какой программы можно открыть файл с расширением .dcp ?
Формат файла DCP! Чем открыть .DCP format? Описание расширения *.DCP
Мы описали большинство
подробнее...
как пользоваться компонентом Open Dialog в Delphi....
TOpenDialog (TSaveDialog) и TOpenPictureDialog (TSavePictureDialog) отображают модальные диалоговые
подробнее...
Как в Delphi програмно создать ini файл??
Раз не создается, значит не "Все делаю как нужно! ". А вы в него пишите хоть что-нибудь?
подробнее...
Как запустить из программы Windows Media Player на проигрывание указанного файла?Программу пишу на Delphi 7.ShellExecute
Открытие файла той программой которая ему сопоставлена, или запуск exe файла-
подробнее...
Ecxel в Delphi
Доброго времени суток.
Боюсь пальцами и парой слов не обойдемся. Если интересует про что
подробнее...