Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.01.16;
Скачать: [xml.tar.bz2];

Вниз

Открыть файл моим приложением   Найти похожие ветки 

 
Konstantin   (2005-01-03 07:02) [0]

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


 
Adder ©   (2005-01-03 07:59) [1]

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]


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

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


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

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

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

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



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

Форум: "Основная";
Текущий архив: 2005.01.16;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.036 c
3-1102832824
able
2004-12-12 09:27
2005.01.16
Получение текущей записи в DBGrid e


4-1101642831
Ralf
2004-11-28 14:53
2005.01.16
Командная строка


14-1104227771
Empleado
2004-12-28 12:56
2005.01.16
Скопировать CD


1-1104413587
AndreyK_6
2004-12-30 16:33
2005.01.16
Что с этим кодом?


14-1104169703
syte_ser78
2004-12-27 20:48
2005.01.16
Обращение к Сумчанам





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский