Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как открыть папку, Как открыть папку 
:(
    Опции темы
alek1987new
Дата 29.3.2010, 05:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 33
Регистрация: 26.11.2009

Репутация: нет
Всего: -1
Привет всем, помогите пожалуйста разобраться каким образом можно открыть папку, путьк к которой вычисляется программно. Заранее благодарен. smile 
PM MAIL   Вверх
Rennigth
Дата 29.3.2010, 08:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1708
Регистрация: 21.6.2004
Где: Moscow

Репутация: 15
Всего: 76
Код

  ShellExecute(Handle, nil, {путь}, nil, nil, SW_SHOWNORMAL);



--------------------
(* Honesta mors turpi vita potior *)
PM MAIL ICQ   Вверх
alek1987new
Дата 29.3.2010, 19:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 33
Регистрация: 26.11.2009

Репутация: нет
Всего: -1
я пробовал подобным образом, но проблема заключается в том, что у меня одна переменная содержит путь к папке, и если я вставляю эту пременную в эту функцию на то место, где должен быть указан путь компилятор ругается.
PM MAIL   Вверх
Proxin
Дата 29.3.2010, 20:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 363
Регистрация: 21.6.2008

Репутация: 1
Всего: 3
Код

procedure showfolder(pth:string);
begin
winexec(pchar('explorer.exe '+pth),sw_shownormal);
end;
PM MAIL   Вверх
Rennigth
Дата 29.3.2010, 23:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1708
Регистрация: 21.6.2004
Где: Moscow

Репутация: 15
Всего: 76
alek1987new, 
Эта переменная у тебя типа string наверное... ?
Код

  ShellExecute(Handle, nil, PChar(Переменная), nil, nil, SW_SHOWNORMAL);



--------------------
(* Honesta mors turpi vita potior *)
PM MAIL ICQ   Вверх
Mikel
Дата 30.3.2010, 08:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник Клуба
Сообщений: 882
Регистрация: 30.3.2002
Где: Саратов

Репутация: нет
Всего: 2
Про WinExec забыть и больше не вспоминать!
Цитата

Note  This function is provided only for compatibility with 16-bit Windows. Applications should use the CreateProcess function.



--------------------
...so remember, it's better to burn out than to fade away
PM MAIL ICQ   Вверх
Rennigth
Дата 31.3.2010, 13:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1708
Регистрация: 21.6.2004
Где: Moscow

Репутация: 15
Всего: 76
Цитата(Mikel @  30.3.2010,  08:52 Найти цитируемый пост)
Про WinExec забыть и больше не вспоминать!

 smile 


--------------------
(* Honesta mors turpi vita potior *)
PM MAIL ICQ   Вверх
Демо
Дата 2.4.2010, 19:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1278
Регистрация: 3.11.2005

Репутация: 7
Всего: 50
Цитата(Mikel @  30.3.2010,  08:52 Найти цитируемый пост)
Про WinExec забыть и больше не вспоминать!


Не надо на WinExec бочку катить.
Функция ещё долго будет служить. Полезна она тем, что позволяет дождаться, пока запускаемое приложение полностью загрузится и начнёт обрабатывать очередь сообщений (для оконных приложений).


--------------------
    
PM MAIL ICQ Skype   Вверх
Mikel
Дата 3.4.2010, 11:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник Клуба
Сообщений: 882
Регистрация: 30.3.2002
Где: Саратов

Репутация: нет
Всего: 2
Так CreateProcess еще и информацию вернет о созданном процессе ) Служить будет долго, до тех пор пока на ХР остаетесь smile


--------------------
...so remember, it's better to burn out than to fade away
PM MAIL ICQ   Вверх
Демо
Дата 3.4.2010, 13:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1278
Регистрация: 3.11.2005

Репутация: 7
Всего: 50
Цитата(Mikel @  3.4.2010,  11:42 Найти цитируемый пост)
Так CreateProcess еще и информацию вернет о созданном процессе ) Служить будет долго, до тех пор пока на ХР остаетесь


А что ограничиваешь Windows XP? У меня прекрасно работает на Windows 7 x64.

Вот только некоторые вопросы:

- Зачем иногда излишняя дополнительная информация о процессе?
- CreateProcess позволяет дождаться, когда запускаемое приложение начнёт выбирать из очереди сообщения?
- CreateProcess можно вызвать без дополнительных усилий по заполнению служебных структур?


Это всё к тому, что не надо слишком прямолинейно следовать рекомендациям кого-бы то ни было.


--------------------
    
PM MAIL ICQ Skype   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0511 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.