http://forum.delphimaster.net/cgi-bin/forum.pl?id=1546962804&n=10

kol webbrowser OnBeforeNavigate2


joeI   (08.01.19 18:53

I would like to know how to attach a procedure to the  OnBeforeNavigate2 in a kol webbrowser app (KOLSHDocVw).
I have tried this

procedure b4nav(Sender: TObject;const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,Headers: OleVariant; var Cancel: WordBool);
begin
end;
with
wb.OnBeforeNavigate2:=twebbrowserbeforenavigate2(makemethod(nil,b4nav));
and
wb.OnBeforeNavigate2:=twebbrowserbeforenavigate2(tonevent(makemethod(nil,b4nav(d [i],d[i],d[i].locationurl,0,nil,nil,nil,false))));

thanks


Дмитрий К ©   (08.01.19 19:29[1]

procedure b4nav(Dummy: Pointer; Sender: ...

wb.OnBeforeNavigate2:=twebbrowserbeforenavigate2(makemethod(nil,@b4nav));


http://kolmck.000webhostapp.com/e_faq.htm#how_to_assign_a_regular


joeI   (08.01.19 20:21[2]

excellent thank you


http://forum.delphimaster.net/cgi-bin/forum.pl?id=1546962804&n=10