Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Открыть файл моим приложением [D6, D7, Win95/98]


Konstantin ©   (2005-01-03 07:02:00) 

Подскажите, плиз, как сделать так, чтоб в моём приложении, при запуске самого приложения, в TWebBrowser открывался определённый по умолчанию файл(типа StartPage), а при клике на *.htm *.html открывалось моё приложение с  *.htm *.html в TWebBrowser???


Konstantin   (2005-01-04 00:00:00) [1]

Попробовал, работает, но выдаёт ошибку(не найден файл, проверьте правильность указания имени и пути......), хотя и открывает этот файл. Да, ещё, это я сделал в FormActivate, т.к. в FormCreate постоянно происходит загрузка StartPage.html и я вместо  with WebBrowser1 do
      Navigate('file:///'+Path+FileName);

сделал  with WebBrowser1 do
      Navigate('file:///'+FileName);

(ругался на неизвестный параметр Path) Может из-за него это ошибка, как пофиксить???


Konstantin   (2005-01-03 23:02:00) [2]

Спсб, по пункту 1 попробую, а со вторым пробовал, пишет не найден файл(тот который открываю) и запускается моя прога со StartPage ((


Adder   (2005-01-03 07:59:00) [3]

1)

procedure TForm1.FormCreate(Sender: TObject);
var
   FileName:string;
begin
   if ParamStr(1)<>'' then FileName:=ParamStr(1)
       else FileName:='startpage.html';
   with WebBrowser1 do
       Navigate('file:///'+Path+FileName);
end;

2) см.[HKEY_CLASSES_ROOT\htmlfile\shell\open\command]


Наверх

Титульная страница Поиск, карта сайта Написать письмо