Hallo. Diese funtion funtioniert dann nicht, wenn ich den Steckerziehe und wieder einstecke.
Dann wird imme FALSE geliefert obwhol ich eine
IP von DHCP bekommen habe und serve kann..
Delphi-Quellcode:
function Tf_Datenuebertragung.IsInternetConnected: Boolean;
var
dwConnectionTypes: DWORD;
begin
dwConnectionTypes :=
INTERNET_CONNECTION_MODEM +
INTERNET_CONNECTION_LAN +
INTERNET_CONNECTION_PROXY;
Result := InternetGetConnectedState(@dwConnectionTypes, 0);
end;