[分享代码] 系统环境公共单元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
[解决办法]
多谢分享~
[解决办法]
不错~
[解决办法]
不错~
[解决办法]
谢谢!
[解决办法]
不错,发扬共享精神啊