Конференция "Сети" » Twebbrowser and Newwindow [D7, WinXP]
 
  • cerber (18.03.08 01:25) [0]
    Суть проблемы.
    Есть сайт, вход на который происходит через аутентификацию пользователя. На сайте есть ссылка которая открывается в новом окне браузера. При использовании Twebbrowser эта ссылка открывается неккректно "Неавторизированный пользователь". В тоже время в ИЕ и Файрфоксе - такой проблемы нет.
    что пробовал:

    procedure TForm1.mbrNewWindow2(Sender: TObject; var ppDisp: IDispatch;
     var Cancel: WordBool);
    var i:integer;
    begin
     newtab;
     {!!!}ppDisp:=mbr1.Document;{!!!}
    end;

    procedure TForm1.newtab;
    var
     Tab:TTabSheet;
    begin
     Tab:=TTabSheet.create(PageControl2);
     Tab.PageControl:=PageControl2;
     PageControl1.ActivePageIndex:=PageControl2.PageCount-1;
     mbr1:=twebbrowser.create(Tab);
     mbr1.ParentWindow:=Tab.Handle;
     mbr1.Align:=alclient;
     TControl(mbr1).Parent:=Tab;
     mbr1.OnNewWindow2:=mbrNewWindow2;
    end;


    Я так понимаю надо возится  с SESSIONID или cookies, а как для Twebbrowser их вклеить  - не знаю.
  • cerber (22.03.08 01:13) [1]
    проблему решил.
    ppDisp:=mbr1.application
 
Конференция "Сети" » Twebbrowser and Newwindow [D7, WinXP]
Есть новые Нет новых   [134431   +15][b:0][p:0.001]