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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Открываем index.html об ShellExecute, Открываем index.html об ShellExecute 
:(
    Опции темы
Гость_Стас
Дата 2.6.2005, 12:41 (ссылка) | (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered
Хелпппп!
Я пытаюсь открыть файл index.html который лежит в одной директории с *.exe фаилом
ShellExecute (Handle, nil, PChar ('IEXPLORER.exe'), PChar ('index.html'), nil, SW_SHOWNORMAL);
Таким образом программа открывает Интернет Експлорер и пытается файл найти в инете http://index.html. Путь к фаилу ('C://index.html') я указать не могу т.к. не известно где будут они находиться. Как это можно сделать? smile
  Вверх
Satana
Дата 2.6.2005, 12:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: 5
попробуй так
ShellExecute (Handle, nil, PChar ('index.html'), nil, nil, SW_SHOWNORMAL);



--------------------
 Работай на себя 
www.abalentsev.com - Сайт портфолио.
www.pokushau.ru - Рецепты со всего мира.
PM MAIL WWW ICQ   Вверх
_hunter
Дата 2.6.2005, 13:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 9
Всего: 98
а почему бы самому путь не определить?
GetCurrentDir() + '\index.html' smile
( насчет слеша не йверен -- проверь )


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
s-mike
Дата 2.6.2005, 15:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: 16
Цитата(Satana @ 2.6.2005, 12:44)
PChar ('index.html')

А что эта хитрая конструкция дает? smile
Добавлено @ 15:56
Цитата(_hunter @ 2.6.2005, 13:08)
GetCurrentDir()

ParamStr(0) / Application.ExeName будет работать надежнее


--------------------
Преферанс для Android на базе исходников Марьяжа
PM MAIL WWW   Вверх
Satana
Дата 2.6.2005, 16:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: 5
Цитата(s @ 2.6.2005, 15:55)
Цитата(Satana @ 2.6.2005, 12:44)
PChar ('index.html')

А что эта хитрая конструкция дает? smile

Ну поидее запуск файла приложением по умолчанию


--------------------
 Работай на себя 
www.abalentsev.com - Сайт портфолио.
www.pokushau.ru - Рецепты со всего мира.
PM MAIL WWW ICQ   Вверх
Quadr0
Дата 2.6.2005, 18:27 (ссылка) | (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered
...

Это сообщение отредактировал(а) Quadr0 - 14.7.2011, 21:03
  Вверх
Pakshin A. S.
Дата 2.6.2005, 18:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

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

var
 put:String;
 si:TStartUpInfo;
 pi:TProcessInformation;
begin
 put:='rundll32.exe shdocvw.dll,OpenURL ' + ExtractFilePath(Application.ExeName) + 'HomePage.url';
 ZeroMemory(@si, SizeOf(si));
 si.cb:=SizeOf(si);
 si.wShowWindow:=SW_Normal;
 si.dwFlags:=STARTF_USESHOWWINDOW;
 CreateProcess(nil, PChar(Put), nil, nil, False, IDLE_PRIORITY_CLASS or DETACHED_PROCESS, nil , nil, si, pi);
PM   Вверх
s-mike
Дата 3.6.2005, 09:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: 16
Цитата(Quadr0 @ 2.6.2005, 18:27)

IncludeTrailingBackslash(ExtractFilePath(ParamStr(0)));

Извини, но это вообще извращение. Посмотри код ExtractFilePath.
Цитата(Satana @ 2.6.2005, 16:02)
Ну поидее запуск файла приложением по умолчанию

Цитата(Quadr0 @ 2.6.2005, 18:27)
Если не указывать путь, а только имя файла, то к имени файла (index.html) автоматически прибавится путь exe файла приложения.

Я имел в виду преобразование в PChar. Его компилятор и так производит, лишнее.


--------------------
Преферанс для Android на базе исходников Марьяжа
PM MAIL WWW   Вверх
Satana
Дата 3.6.2005, 09:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: 5
s-mike Ну раз лишнее не пиши smile


--------------------
 Работай на себя 
www.abalentsev.com - Сайт портфолио.
www.pokushau.ru - Рецепты со всего мира.
PM MAIL WWW ICQ   Вверх
Quadr0
Дата 3.6.2005, 10:17 (ссылка) | (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered
...

Это сообщение отредактировал(а) Quadr0 - 14.7.2011, 21:04
  Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

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

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

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

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

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


 




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


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

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