Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

2 простейших вопроса. [D7, WinXP]

The Sound © (2005-08-28 22:00:00)
Мне нужно создать автолоадер для СД.
Возникло 2 простых вопроса:
1. Какой функцией, можно открыть папку?
2. Какой функцией, можно запустить фаил?(независимо от разширения).

Спасибо =)

Рамиль (2005-08-29 10:36:00) [1]
usesShellAPI //!!!

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', ' http://www.delphiworld.ru', nil, nil, SW_SHOWMAXIMIZED);

Запуск почтового клиента:
ShellExecute(Self.Handle, 'open', 'mailto:vasya@mail.ru', nil, nil, SW_SHOWNORMAL);

autorun (2005-08-29 10:20:00) [2]
Создать файл autorun.inf в котором разместить строки:
[autorun]
open = C:\Program Files\Winamp\winamp.exe music.m3u
icon = ico.ico

Fay (2005-08-29 04:40:00) [3]
The Sound (28.08.05 22:08) [3]
Меню->Help->Microsoft SDK

Плохиш (2005-08-28 23:24:00) [4]
Этот вопрос здесь последние пару дней мусолится по нескольку раз за день.

Джо (2005-08-28 22:11:00) [5]

> [3] The Sound (28.08.05 22:08)
> 2Джо, по ctrl+f1, не нашёл справки. можно маленький пример?
> =)

В этой ветке не буду. Ее могут закрыть в любой момент из-за нарешения правил (неверно оформлена тема вопроса).

The Sound (2005-08-28 22:08:00) [6]
2Джо, по ctrl+f1, не нашёл справки. можно маленький пример? =)

Джо (2005-08-28 22:03:00) [7]
Оба вопроса: ShellExecute

The Sound (2005-08-28 22:01:00) [8]
П.С. Открыть папку в експлорере. =)

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »