delphi技术专题---获取网卡物理地址之NB30.pas单元TNCB详解以及源代码分享

最新推荐文章于 2023-03-22 09:20:18 发布

苏生米沿

最新推荐文章于 2023-03-22 09:20:18 发布

阅读量3.5k

点赞数 2

分类专栏： Delphi

本文链接：https://blog.csdn.net/sushengmiyan/article/details/8543774

版权

本文深入探讨了Delphi中利用Netbios API的NB30.pas单元，特别是TNCB结构的详细解释，并分享了获取网卡物理地址的源代码。

摘要由CSDN通过智能技术生成

接下来将要进入Netbios的编程应用阶段。要想调用Netbios API函数，需要链接系统的NETAPI32.DLL文件。Delphi提供了一个NB30单元Netbios API函数及相关的结构、常量进行了定义。

首先来看看Netbios API包括哪些内容。实际Netbios API只有一个函数:

UCHAR Netbios(PNCB: pNCB);

函数中的惟一参数pNCB是一个指向某个网络控制块(TNCB)的指针。在那个NCB结构中，包含了为执行一个Netbios命令，相应的Netbios函数需要用到的全部信息。该结构的定义如下:

type
  // Network Control Block
  PNCB = ^TNCB;

  TNCBPostProc = procedure(P: PNCB);

  TNCB = packed record
    ncb_command: Char;         // command code
    ncb_retcode: Char;         // return code
    ncb_lsn: Char;             // local session number
    ncb_num: Char;             // number of our network name
    ncb_buffer: PChar;         // address of message buffer
    ncb_length: Word;          // size of message buffer
    ncb_callname: array[0..NCBNAMSZ - 1] of char;  // blank-padded name of remote
    ncb_name: array[0..NCBNAMSZ - 1] of char