Mega Code Archive

 

Categories / Delphi / Examples

 

Network connection present

How to check if a network connection is present. GetSystemMetrics has information on networking function NetworkPresent: Boolean; begin Result := GetSystemMetrics(SM_NETWORK) and $01 = $01; end;