Как через дельфи открыть папку в проводнике? - Общие вопросы Delphi

t3ns0r · 23.07.2007, 15:58

Привет! Нужна помощь!
Как через дельфи открыть папку в проводнике?

Net · 23.07.2007, 16:15

...
uses ShellAPI;
...
...
...
ShellExecute(Handle, 'open', PChar('путь к файлу/папке'), PChar('параметры ком. строки'), PChar('рабочая папка'), SW_SHOWNORMAL);

Обычно параметры и рабочую папку ставят в nil. Вместо действия open есть еще print.

Для деталей посмотри справку WinApi по этой функции.

Stilet · 23.07.2007, 16:44

Вообще-то вместо Open Лучше ставить Explore. Почитай по хелпу там написано

t3ns0r · 23.07.2007, 16:45

2 Net
пасибо

t3ns0r · 23.07.2007, 16:48

всё работает, благодарю

OLEG'arh · 28.03.2009, 21:27

программно открыть папку ( каталог )

Проводник explorer.exe /e,
WinExec('EXPLORER /e, '+'"c:\"', SW_SHOW);

Открыть explorer.exe
WinExec('EXPLORER , '+'"c:\"', SW_SHOW);

Pirotexnik · 28.03.2009, 21:32

Можно ещё сделать обзор файлов и папок:

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if OpenDialog1.Execute then
   Edit1.Text:=OpenDialog1.FileName;
end;

По нажатию на кнопку откроется диалог, а выбраный файл появется в Edit1

Исчерпано. Закрыто.

23.07.2007, 15:58	#1
t3ns0r Пользователь Регистрация: 23.07.2007 Сообщений: 20	Как через дельфи открыть папку в проводнике? Привет! Нужна помощь! Как через дельфи открыть папку в проводнике?

23.07.2007, 16:44	#3
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Вообще-то вместо Open Лучше ставить Explore. Почитай по хелпу там написано I'm learning to live...

28.03.2009, 21:32	#7
Pirotexnik Форумчанин Регистрация: 22.03.2009 Сообщений: 110	Можно ещё сделать обзор файлов и папок: Код: `procedure TForm1.Button1Click(Sender: TObject); begin if OpenDialog1.Execute then Edit1.Text:=OpenDialog1.FileName; end;` По нажатию на кнопку откроется диалог, а выбраный файл появется в Edit1 Исчерпано. Закрыто. Последний раз редактировалось mihali4; 28.03.2009 в 23:03.

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Как программно через delphi создать папку на диске?	VenMaster	Общие вопросы Delphi	5	25.05.2008 21:09
Как Web документ(htm, mht, и т.д.) открыть через Word?	Yelzhas	Общие вопросы Delphi	4	18.11.2007 20:14
Открыть порт для подключения через proxy	Progs	Работа с сетью в Delphi	18	05.07.2007 11:13
как открыть файл через прогу?	ЧИЖ	Общие вопросы Delphi	12	29.05.2007 17:45
КАК ОТКРЫТЬ ЛЮБОЕ ПРИЛОЖЕНИЕ ЧЕРЕЗ DELPHI???	micaell	Общие вопросы Delphi	8	17.12.2006 20:05

23.07.2007, 16:15	#2
Net ;-) Пользователь Регистрация: 18.07.2007 Сообщений: 69	... uses ShellAPI; ... ... ... ShellExecute(Handle, 'open', PChar('путь к файлу/папке'), PChar('параметры ком. строки'), PChar('рабочая папка'), SW_SHOWNORMAL); Обычно параметры и рабочую папку ставят в nil. Вместо действия open есть еще print. Для деталей посмотри справку WinApi по этой функции.

23.07.2007, 16:45	#4
t3ns0r Пользователь Регистрация: 23.07.2007 Сообщений: 20	2 Net пасибо

23.07.2007, 16:48	#5
t3ns0r Пользователь Регистрация: 23.07.2007 Сообщений: 20	всё работает, благодарю

28.03.2009, 21:27	#6
OLEG'arh Пользователь Регистрация: 23.11.2006 Сообщений: 42	программно открыть папку ( каталог ) Проводник explorer.exe /e, WinExec('EXPLORER /e, '+'"c:\"', SW_SHOW); Открыть explorer.exe WinExec('EXPLORER , '+'"c:\"', SW_SHOW);