这是一个实现Delphi定时上网功能的范例源码，定时打开Internet，这个功能可以编写一些教育辅助软件使用。特别可用于一些家庭电脑防护网络沉迷的功能。不过本程序的功能比较单一，例子中仅是定时上网的功能，仅此而已。 　　本程序运行前，需要设置好日期时间，和网址，到时用调用浏览器打开该网址。如下代码是关键： 　　begin 　　upnet:=datetostr(DateTimePicker1.date)''timetostr(DateTimePicker2.Time); 　　if(now>strtodatetime(upnet))then 　　begin 　　Sh