ActiveX单元中CoCreateGUID函数的使用,第三方控件ReportBuilder如何用

Question

我参考教材上用GUID获取网卡MAC地址,是调用ActiveX单元中CoCreateGUID函数来获得了的,但是为什么多次点击按钮会得出多个GUID标识和相应的MAC地址呢?
D6 的帮助里面找不到这个函数,请问它不是只获取本机的MAC地址吗?第三方控件ReportBuilder还好用,我学过它的USE GUID但是在Delphi 7环境是我不知道怎么引入数据表到Design里面?
请问用它作一个报表,从数据库连接开始,到设计要用到哪此控件如何连接?

Answer 1

按钮的操作如下.
procedure TForm1.btnCoCreateGUIDClick(Sender: TObject);
var
  {定义GUID变量}
   GUID: TGUID;
   {GUID操作函数要WideString类型}
   WCLTD: array[0..127] of WideChar;
   Start: Integer;
begin
   CoCreateGUID(GUID);
   StringFromGuid2(GUID,WCLTD,Sizeof(WCLTD) div 2);   ShowMessage('多次点击按钮,怎么会有多个不同的GUID和MAC,难道不仅是获取本机的吗?');
   Edit1.Text := WideCharToString(WCLTD);
   //get start position
   Start := Length(Edit1.Text) - 12 ;
   Edit2.Text := Copy(Edit1.Text, Start,12);end;
====CSDN 小助手 V2.0 2005年10月16日发布====
CSDN小助手是一款脱离浏览器也可以访问Csdn论坛的软件
界面：http://blog.csdn.net/Qqwwee_Com/archive/2005/10/16/504620.aspx
下载：http://szlawbook.com/csdnv2/csdnv2.rar为神六喝彩，向所有科技工作者致敬！
拒绝日货。