Delphi-TWebBrowser-Open in new Tab-Prostřední myšítko
Dobrý den,
potřebuji v Turbo Delphi napsat proceduru, která se provede, když v komponentě TWebBrowser stisknu prostřední myčítko (kolečko) nad odkazem. (Využití pro otevírání nových listů prohlížeče)
Děkuji
Něco jako:
procedure OnMouseActivate;
if (Button=mbMiddle) and (myš je nad hyperlinkem) then showmessage('Hello!');
Vyřešeno pomocí OnChangeStatusText u TWebBrowser a pomocí OnMouseActivate u TForm.