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
În acest articol voi vorbi despre definiția ping-ului (ping) în Delphi. Cred că toți sunteți familiarizați cu comanda standard Windows. Dacă nu, apăsați tasta fierbinte Win + R și în fereastra apărută introduceți cmd
Acum vom încerca același lucru în Delphi. Creați un nou proiect File-> New-> VCL Form Application și aruncați pe formular următoarele componente: TButton, TLabel, TEdit și TMemo. Pentru o afișare mai frumoasă, puteți schimba culoarea fontului (Font-> Color) în setările Memo.
Pentru a efectua ping-ul, utilizați următoarea procedură:
procedura TForm1.Button1Click (expeditor: TObject); începe Ping (Edit1.Text, Memo1.Lines); se încheie;
procedura TForm1.Button1Click (expeditor: TObject); începe Ping (Edit1.Text, Memo1.Lines); se încheie;
Articole similare
Trimiteți-le prietenilor: