In addition to Weibo, there is also WeChat
Please pay attention
WeChat public account
Shulou
2025-03-31 Update From: SLTechnology News&Howtos shulou NAV: SLTechnology News&Howtos > Internet Technology >
Share
Shulou(Shulou.com)06/03 Report--
Procedure TForm1.WebBrowser1BeforeNavigate2 (ASender: TObject;const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,Headers: OleVariant; var Cancel: WordBool); varmyurl,tstr:string;Stpos,len:Integer;beginif WebBrowser1.ReadyState=READYSTATE_COMPLETE then / / determine whether the page has loaded beginmyurl:=string (URL); / / get URLStpos:=LastDelimiter ('#', myurl); / / get the number of # backward characters in URL len:=Stpos-1 / / character length minus one tstr: = Copy (myurl,stpos+1,len); / / subcharacters after combined filtering / / determine which link the user clicked on if tstr='caigou' thenbeginShowMessage ('caigou'); Cancel:=True;Exit;end;if tstr='caiwu' thenbeginShowMessage (' caiwu'); Cancel:=True;Exit;end;if tstr='xiaoshou' thenbeginShowMessage ('xiaoshou'); Cancel:=True;Exit;end;if tstr='cangku' thenbeginShowMessage (' cangku') Cancel:=True;Exit;end;if tstr='renshi' thenbeginShowMessage ('renshi'); Cancel:=True;Exit;end;end;end
Welcome to subscribe "Shulou Technology Information " to get latest news, interesting things and hot topics in the IT industry, and controls the hottest and latest Internet news, technology news and IT industry trends.
Views: 0
*The comments in the above article only represent the author's personal views and do not represent the views and positions of this website. If you have more insights, please feel free to contribute and share.
Continue with the installation of the previous hadoop.First, install zookooper1. Decompress zookoope
"Every 5-10 years, there's a rare product, a really special, very unusual product that's the most un
© 2024 shulou.com SLNews company. All rights reserved.