2010 年 1月 31 日随笔档案 - oKmAn.Org

2010年1月31日

摘要： function NBGetAdapterAddress(a: integer): String; //a指定多个网卡适配器中的哪一个0，1，2... Var NCB:TNCB; //NetBios控制块 ADAPTER:TADAPTERSTATUS; //取网卡状态 LANAENUM:TLANAENUM; //Netbios lana intIdx:Integer; //Temporar... 阅读全文

posted @ 2010-01-31 23:41 oKmAn.Org 阅读(264) 评论(0) 推荐(0) 编辑

取本机IP地址

摘要： function LocalIP: String;type TaPInAddr = Array[0..10] of PInAddr; PaPInAddr = ^TaPInAddr;var phe: PHostEnt; pptr: PaPInAddr; Buffer: Array[0..63] of AnsiChar; i: Integer; GInitData: TWSAData;b... 阅读全文

posted @ 2010-01-31 23:39 oKmAn.Org 阅读(333) 评论(0) 推荐(0) 编辑

delphi注册表操作(读取、添加、删除、修改)完全手册

摘要： 32位Delphi程序中可利用TRegistry对象来存取注册表文件中的信息。　　一、创建和释放TRegistry对象　　1.创建TRegistry对象。为了操作注册表，要创建一个TRegistry对象：ARegistry := TRegistry.Create；　　2.释放TRegistry对象。对注册表操作结束后，应释放TRegistry对象所占内存：ARegistry.Destroy。... 阅读全文

posted @ 2010-01-31 03:12 oKmAn.Org 阅读(572) 评论(1) 推荐(0) 编辑