Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.11.19;
Скачать: CL | DM;

Вниз

Проблема с WebBrowser.OnFileDownload   Найти похожие ветки 

 
AlexeyT ©   (2006-10-11 16:42) [0]

Импортировал WebBrowser под Win98 IE4, чтобы использовать OnFileDownload, возникла проблема при запуске под XP SP2 IE7.

procedure TMyComp.WebBrowserFileDownload(Sender: TObject; var Cancel: WordBool);
begin
 Cancel:= false;
end;


такой код в обработчике выдает AV. Посмотрел, есть ли различие в объявлении OnFileDownload в разных системах: есть. В либе полученной под IE4 событие имеет один параметр, Cancel. В либе от IE7 есть дополнительный параметр ActiveDocument, видимо из-за этого и рушится.

 TWebBrowserFileDownload = procedure(Sender: TObject; ActiveDocument: WordBool;
                                                       var Cancel: WordBool) of object;


Что делать? Взять либу от IE7, перестанет работать под IE4.


 
clickmaker ©   (2006-10-11 17:01) [1]

ну а ежели в зависимости от версии IE цеплять разные обработчики в ран-тайме?


 
AlexeyT ©   (2006-10-11 17:53) [2]

Во-первых, криво, во-вторых, какая там "зависимость от версии"? Я на сайте msdn про OnFileDownload нашел инфу только применительно к NET, а про обычную Win32 версию что-то не видно.


 
clickmaker ©   (2006-10-11 18:11) [3]

http://msdn.microsoft.com/library/default.asp?url=/workshop/browser/webbrowser/browser_control_node_entry.asp


 
AlexeyT ©   (2006-10-11 20:09) [4]

Спасибо! Там оно называется просто FileDownload.

void FileDownload(          VARIANT_BOOL *ActiveDocument,
   VARIANT_BOOL *&Cancel
);

как видно, параметр ActiveDocument там есть.

Попробую код из IE7 TLB запустить на IE4, может поможет.


 
AlexeyT ©   (2006-10-11 21:51) [5]

Помогло!

TLB для IE7 работает корректно и под IE4, и под IE7.



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

Текущий архив: 2006.11.19;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.057 c
3-1158307102
Guest001
2006-09-15 11:58
2006.11.19
Exception в Firebird не ловится в Delphi - почему?


15-1162486418
Kolan
2006-11-02 19:53
2006.11.19
Дайте определение полиморфизма


15-1162481125
Курдль
2006-11-02 18:25
2006.11.19
"Отрежте мне язык, но я должен это видеть!"


11-1138966981
homm
2006-02-03 14:43
2006.11.19
Обработка исключений


8-1144960276
Alpine
2006-04-14 00:31
2006.11.19
Помогите с DSPACK+web camera