Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.12;
Скачать: CL | DM;

Вниз

Как открыть папку в том же окне с помощью ShellExecute???   Найти похожие ветки 

 
Volf_555   (2005-12-20 19:36) [0]

В реестр добавил контекстное меню к папке и прописал в значении по умолчанию:
"D:\Programs\Exec.exe" "%1"
В программе пишу:
ShellExecute(handle,"open",nil,nil,PChar(ParamStr(1)),SW_Normal);
В результате папка открывается в новом окне... Как сделать чтобы папка открывалась в том же окне?


 
Lamer@fools.ua ©   (2005-12-20 20:25) [1]

Не уверен, но попробуйте вместо "open" написать nil.


 
Volf_555   (2005-12-20 20:47) [2]


> Lamer@fools.ua ©   (20.12.05 20:25) [1]
> Не уверен, но попробуйте вместо "open" написать nil.


В таком случае вообще никаких действий не происходит с папкой, а просто постоянно открывается программа и закрывается - и так до бесконечности


 
Lamer@fools.ua ©   (2005-12-21 09:01) [3]

Я, оказывается, невнимательно вопрос прочитал.

Вот это:
>В результате папка открывается в новом окне... Как сделать чтобы папка открывалась в том же окне?
совсем непонятно. К каком том же окне?


 
Lamer@fools.ua ©   (2005-12-21 09:02) [4]

>К каком
Сорри, читать "В каком".


 
Volf_555   (2005-12-21 19:32) [5]

Допустим - сейчас я нахожусь в папке С:\ >> нажимаю правой кнопкой на папке с именем Files >> выбираю OpenWithMyProg >> запускается моя програма, которая открывает папку и записывает лог в файл.

Но когда я таким образом:

> "D:\Programs\Exec.exe" "%1"
> В программе пишу:
> ShellExecute(handle,"open",nil,nil,PChar(ParamStr(1)),SW_Normal);
>

открываю папку, то папка открывается в новом окне.


 
Lamer@fools.ua ©   (2005-12-21 20:27) [6]

>>Volf_555   (21.12.05 19:32) [5]

IMHO, это с помощью внешней программы не сделать. Нужно писать Shell Extension (или как там их). Пример есть в поставке Delphi в Demos\ActiveX\ShellExt, если не ошибаюсь.



Страницы: 1 вся ветка

Текущий архив: 2006.03.12;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.058 c
3-1137593732
samalex
2006-01-18 17:15
2006.03.12
Таблица с маской ввода


15-1139823152
QuasiLamo
2006-02-13 12:32
2006.03.12
Решение проблем


1-1139479968
Новенький
2006-02-09 13:12
2006.03.12
D 2005 DFM Binary - > Text


2-1140616905
veb
2006-02-22 17:01
2006.03.12
Первая попытка подключения к инернету


15-1139919604
Digitman
2006-02-14 15:20
2006.03.12
ASIO DDK