主题:  看看我的GetVolumeInformation有什么问题

hjghj
职务：普通成员
等级：1
金币：0.0
发贴：36
#12003/12/9 9:47:51
看看我的GetVolumeInformation有什么问题,我已经打过包在各个机子上测试过了,在98和ME中是没有问题的,但在XP中却检测出硬盘号为0.请高手帮忙指点一二!

ResizeWindow(320,160)
SetWindowText(WindowHandle,"注册程序"
mem2 := AllocMem(4)
mem3 := AllocMem(4)
GetVolumeInformation( "C:\\", "", 0, mem2, mem3, "", "", 0 )
jiqima := PeekULong(mem2, 0)
YesOrNo:=MessageBox( WindowHandle, " 你的机器码："^jiqima,"","获取本机注册码",4)



魔岩
职务：版主
等级：6
金币：34.0
发贴：4453
#22003/12/9 10:50:35
你查下最新的MSDN

看看GetVolumeInformation在XP下的应用场合