[分享代码] 系统环境公共单元System.Environment.pas,该怎么处理

[分享代码] 系统环境公共单元System.Environment.pas
我们平时写Delphi程序的时候经常要获取一些系统信息，比如当前的机器名称、用户名、当前应用程序的路径、系统环境变量、逻辑盘符、某些特殊文件夹的位置、本机的IP地址、外网的IP地址、网卡的物理地址（MAC）、Internet连接状态等等。今天我把以前的这些代码整理并封装在一个单元里面，分享给大家。

原始单元名称为System.Environment.pas，命名参考了.Net里面的System.Environment类，同时根据Delphi的特性做了一些调整和扩充。

DEMO截图：


源代码下载及帮助见：http://www.zuobaoquan.com/2009/04/26/delphi-system-environment-pas/

------解决方案--------------------
真不错，
支持一下！
------解决方案--------------------
看看~~~
------解决方案--------------------
哪天下下来看看
------解决方案--------------------
真不错，谢谢楼主分享。
------解决方案--------------------
不错
------解决方案--------------------
嗯，学习学习
------解决方案--------------------
study and up
------解决方案--------------------
多謝！！
------解决方案--------------------
谢谢
------解决方案--------------------
up
------解决方案--------------------
多谢分享~
------解决方案--------------------
不错~
------解决方案--------------------
不错~
------解决方案--------------------
谢谢!
------解决方案--------------------
不错，发扬共享精神啊