novell中的DELPHI1.0如何获取本机的唯一标识（如网卡号）(100分)

H

hyw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1998-09-11

• #1

谢谢！MAILTO hyw@163.net

 

吕

吕雪松

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1998-09-11

• #2

试试GetComputerName()和Netbios()。

 

H

holly

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1998-09-11

• #3

There is an IPX call to get the NIC MAC address.

 

L

lanny

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1998-09-15

• #4

你试试下面这两个函数，应该可以搞定你的问题

Function CreateUniqueClassID: string;
var GUID: TGUID;
WCLID: array[0..127] of WideChar;
begin
OleCheck(CoCreateGUID(GUID));
StringFromGuid2(GUID,WCLID,SizeOf(WCLID) div 2);
Result:=WideCharToString(WCLID)
end;

Function RetNetID:String;
var
S:String;
begin
S:=CreateUniqueClassID;
Result:=Copy(S,26,12);
end;

 

W

wang_xing

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1998-09-24

• #5

在delphi深度历险中的系统相关构件或单元中有一个ETHERADR.ZIP的构件可以让您在win95/NT下取得Ethernet的Mac地址。

 

V

victor

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-05-13

• #6

would you please send me a copy.
I can't find ETHERADR.ZIP.

my e-mail: zyj_72@hotmail.com

thank you first!!