做了个软件更新程序，不过在没联网的时候会报错
程序一运行会自动链接数据库，可是在没网的情况下，程序就会报错，如何解决这种情况？如何判断能在联网的情况下，软件会正常链接数据库，在没联网的情况下软件也能正常运行而不链接数据库
[解决办法]
function InternetConnected:Boolean;StdCall;
const
INTERNET_CONNECTION_MODEM=1;
INTERNET_CONNECTION_LAN=2;
INTERNET_CONNECTION_PROXY=4;
INTERNET_CONNECTION_MODEM_BUSY=8;
var
dwConnectionTypes:word;
begin
dwConnectionTypes:=INTERNET_CONNECTION_MODEM+INTERNET_CONNECTION_LAN+INTERNET_CONNECTION_PROXY;
Result:=InternetGetConnectedState(@dwConnectionTypes,0);
end;
判断下有没连网
