numai materiale utile
Acționarul principal al Alibaba a devenit cel mai bogat om din China
Articole
Microsoft a început testarea închisă a Office 16
Articole
Experții au găsit găuri de securitate în Windows 8.1
Articole
În metroul din Moscova va fi o rețea mobilă unificată
Articole
eBay va accepta Bitcoin
Articole
Vivitek a prezentat proiectorul "școală" D755WTIR
Articole
Butonul "Cumpărați" a apărut pe Twitter
Articole
"Yandex.News" poate fi acum vizualizat pe iPhone
Articole
mshtml, ActiveX, COMObj, IdHTTP, idURI;
Creați o nouă procedură prin care programul nostru va analiza linkurile. După cuvântul cheie public vom scrie următorul cod:
procedură ExtractLinks (const url: String; șiruri const: TStrings);
Apoi, apăsăm pe tasta CTRL + Shift + C, care este deja cunoscută, ca rezultat al căror Delphi va genera un șablon pentru procedura viitoare.
Declarați variabilele locale
var
IDOC. IHTMLDocument2;
strHTML. șir de caractere;
v. varianta;
x. întreg;
link-uri. OleVariant;
docURL. șir de caractere;
URI. TidURI;
ahref. șir de caractere;
idHTTP. TidHTTP;
În corpul procedurii, între Begin. sfârșit, scrieți următorul cod:
Prin urmare, cu pregătirile de bază am terminat și foarte curând jucăria robotului se va arăta în acțiune. Și acum să aruncăm pe formularul 3 componente din meniul Standard: Edit, Button, Memo
În cele din urmă, creați un handler de evenimente OnClick pe butonul, în care ne numim procedura cu parametrii necesari (între început începeți scrieți)
Asta-i totul și conduceți și compilați proiectul.
Trimiteți-le prietenilor: