Detekce sítě

Klíčová slova:
Rubrika: Delphi

V některých případech je nutné zjistit jestli uživatel používá síť, resp. jestli má nainstalovanou podporu sítě. Je to velmi jednoduché. Můžeme k tomu využít funkci GetSystemMetrics s parametrem SM_NETWORK. Nejnižší bit vrácené hodnoty pak oznamuje jeli přítomna podpora sítě. Vlastní funkce pro zjištění bude vypadat takto:

function ActiveNetwork : Boolean;
begin
Result := GetSystemMetrics(SM_NETWORK) and $01 = $01;
end;

Autor: Jiří Provazník
Datum vydání: 06.03.2003 | Zobrazeno: 3180
Permanentní odkaz: Detekce sítě

Komentáře (0)