[分享代码] 系统环境公共单元System.Environment.pas

ZuoBaoquan 2009-04-26 05:55:25
加精
我们平时写Delphi程序的时候经常要获取一些系统信息,比如当前的机器名称、用户名、当前应用程序的路径、系统环境变量、逻辑盘符、某些特殊文件夹的位置、本机的IP地址、外网的IP地址、网卡的物理地址(MAC)、Internet连接状态等等。今天我把以前的这些代码整理并封装在一个单元里面,分享给大家。

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

DEMO截图:


源代码下载及帮助见:http://www.zuobaoquan.com/2009/04/26/delphi-system-environment-pas/
...全文
437 21 打赏 收藏 转发到动态 举报
写回复
用AI写文章
21 条回复
切换为时间正序
请发表友善的回复…
发表回复
bcrun 2010-02-19
  • 打赏
  • 举报
回复
坏了,正想用呢,那个网址无效了
symr1314 2009-12-23
  • 打赏
  • 举报
回复
FallenCity 2009-11-28
  • 打赏
  • 举报
回复
不错,收藏了!
大嘴鳄 2009-04-27
  • 打赏
  • 举报
回复
不错,发扬共享精神啊
Bear_hx 2009-04-27
  • 打赏
  • 举报
回复
真不错,谢谢楼主分享。
willflyz 2009-04-27
  • 打赏
  • 举报
回复
谢谢!
xzhifei 2009-04-27
  • 打赏
  • 举报
回复
不错~
liangpei2008 2009-04-27
  • 打赏
  • 举报
回复
不错~
Storm2008 2009-04-27
  • 打赏
  • 举报
回复
多谢分享~
whisht 2009-04-27
  • 打赏
  • 举报
回复
up
hemiya 2009-04-27
  • 打赏
  • 举报
回复
谢谢
starluck 2009-04-27
  • 打赏
  • 举报
回复
多謝!!
kye_jufei 2009-04-27
  • 打赏
  • 举报
回复
study and up
纯冰糖 2009-04-27
  • 打赏
  • 举报
回复
嗯,学习学习
hongqi162 2009-04-27
  • 打赏
  • 举报
回复
不错
ZuoBaoquan 2009-04-27
  • 打赏
  • 举报
回复
大家看看还有没有什么需求需要添加进去的?我再抽时间完善下。
ZuoBaoquan 2009-04-27
  • 打赏
  • 举报
回复
呵呵,毕竟抽了不少时间去写哈~
sanguomi 2009-04-26
  • 打赏
  • 举报
回复
哪天下下来看看
ZuoBaoquan 2009-04-26
  • 打赏
  • 举报
回复
@yhf365,谢谢!
你速度好快啊~
de410 2009-04-26
  • 打赏
  • 举报
回复
看看~~~
加载更多回复(1)

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧