Есть простой обработчик события BeforeNavigate2
procedure TMyBHO.BeforeNavigate2(const pDisp: IDispatch; var URL: OleVariant; var Flags: OleVariant; var TargetFrameName: OleVariant; var PostData: OleVariant; var Headers: OleVariant; var Cancel: WordBool);
var iWB: IWebBrowser2;
begin
if Succeeded(pDisp.QueryInterface(IWebBrowser2, iWB)) then
BEGIN
iWB.Navigate2(URL, flags, TargetFrameName, PostData, Headers);
Cancel := true;
END;
end;
Булевская переменная чтобы не получит бесконечный цикл здесь опущена.
Суть не в этом.
Как видите здесь происходит простейшее перенаправление навигации
iWB.Navigate2(URL, flags, TargetFrameName, PostData, Headers);
Для обычных сайтов все работает отлично.
А вот с почтовыми серверами проблемма.
Если я пытаюсь например зайти в почту на
http://www.mail.ru/или https://mail.google.com - почтовый сервер меня не пускает.
Очевидно что при таком перенаправлении что-то теряется
(или cookie или заголовки или что-то еще).
Кто сталкивался с такое проблеммой?
Как это решается?