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

Вниз

Странное поведение Navigate в TwebBrowser   Найти похожие ветки 

 
Fr   (2012-04-08 22:02) [0]

на форме в приложении лежит TwebBrowser. В определенный момент по условию запускается
WB.Navigate("about:<html><style>"+
"h1{font-family:arial;color:blue;font-size:8pt;text-align:center;}"body{font-family:arial;font-size:8pt;text-align:left;}</style><body></body></html>");

И вот тут начинается самое интересное. Код нормально срабатывает только при значениях font-size:8pt
При попытке изменить его на 10,12,14... запускается IE (причем он не установлен в системе по-умолчанию) во время обработки этого Nvigate.

В чем может быть проблема?


 
Fr   (2012-04-08 22:04) [1]

Неправильно скопировал код из приложения. Вот то. что там:
WB.Navigate("about:<html><style>h1{font-family:arial;color:blue;font-size:8pt;text-align:center;}body{font-family:arial;font-size:8pt;text-align:left;}</style><body></body></html>");


 
sniknik ©   (2012-04-08 22:22) [2]

новое приложение, с 1 WebBrowser и 1 кнопкой (сойдет за "условие"?). проблемы не получается. что значит она в другом месте.


 
sniknik ©   (2012-04-08 22:24) [3]

хотя, это не мешает html в примере быть с ошибками.


 
sniknik ©   (2012-04-08 22:33) [4]

p.s. как то уже сталкивался, при более менее большом коде "about" не работает... поэтому делал так -

 procedure WBLoadHTML(WebBrowser: TWebBrowser; const HTMLCode: string);
 var
   ms: TStringStream;
 begin
  WebBrowser.Navigate("about:blank");
  while WebBrowser.ReadyState < READYSTATE_INTERACTIVE do begin
    Application.ProcessMessages;
    Sleep(0);
  end;

  if Assigned(WebBrowser.Document) then begin
    ms:= TStringStream.Create(HTMLCode);
    try
      (WebBrowser.Document as IPersistStreamInit).Load(TStreamAdapter.Create(ms));
    finally
      ms.Free;
    end;
  end;
 end;


 
Fr   (2012-04-08 22:34) [5]


> хотя, это не мешает html в примере быть с ошибками.

подстановка в код <head>....</head> ничего не меняет. Все-равно вываливается IE. Если не трудно - укажите ошибку в этом html коде.


> новое приложение, с 1 WebBrowser и 1 кнопкой (сойдет за
> "условие"?). проблемы не получается. что значит она в другом
> месте.

Чистое приложение c WB и кнопкой проходит на ура.
Здесь же все то же самое, но вываливается IE именно на обработке Navigate.


 
sniknik ©   (2012-04-08 22:40) [6]

> Чистое приложение c WB и кнопкой проходит на ура.
значит тут ошибки нет...

> но вываливается IE именно на обработке Navigate.
> что значит она в другом месте.
в месте вызова например, вдруг оно в потоке... + без инициализации COM.


 
Fr   (2012-04-08 22:46) [7]


> sniknik ©

Спасибо, разобрался....


 
sniknik ©   (2012-04-08 23:15) [8]

ИИИИ????

p.s. слов нет, один мат остался... нафига мне твое спасибо, без описания причины? чувство, как читать детектив с последней страницей которого в туалет сходили.


 
Cobalt ©   (2012-04-09 11:06) [9]

подозреваю, что ТС переместил загрузку кода из Navigate в Load


 
Fr   (2012-04-09 16:00) [10]


> sniknik ©   (08.04.12 23:15) [8]

Виноват я сам - не просмотрел код в BeforeNavigate2.... Сорри.



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

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

Наверх





Память: 0.46 MB
Время: 0.065 c
15-1340390614
Error Macro
2012-06-22 22:43
2013.03.22
waveOutWrite. Как вывести 2 звука одновременно?


2-1329518473
теркин
2012-02-18 02:41
2013.03.22
Удаление элементов косвенно рекурсивных списков


15-1339444852
alexdn
2012-06-12 00:00
2013.03.22
PHPbb движёк


15-1339158733
oxffff
2012-06-08 16:32
2013.03.22
Производственный календарь. Если web сервис бесплатный?


15-1342183148
yorik_spb
2012-07-13 16:39
2013.03.22
Организации требуется - старший программист (Delphi+M SSQL)





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский