D
duducat
Unregistered / Unconfirmed
GUEST, unregistred user!
to HD_Copy
高手你的代码很详细！谢谢！我另外发个帖子，给你加分吧！
to yzhshi
你能不能帮我测试下WINXP下的函数：）谢谢再给你加分哟！
高手你的代码很详细！谢谢！我另外发个帖子，给你加分吧！
to yzhshi
你能不能帮我测试下WINXP下的函数：）谢谢再给你加分哟！
Y
yzhshi
Unregistered / Unconfirmed
GUEST, unregistred user!
OK！我可以帮你测试，不过分数嘛，就免了，我已经得到了我应该得到的。[
]
这个就给hd_copy吧。
]这个就给hd_copy吧。
D
duducat
Unregistered / Unconfirmed
GUEST, unregistred user!
好的！谢谢：）我先下了！！！晚上来给HD_Copy加分哟！
Y
yzhshi
Unregistered / Unconfirmed
GUEST, unregistred user!
呵呵，看来俺又要重新启动计算机了。[
]
]
H
HD_Copy
Unregistered / Unconfirmed
GUEST, unregistred user!
to duducat：
老大，你千万别叫我“高手”，我水平还很差呀！绝对不是谦虚，和yzhshi相比，
差得不是一点两点啊，其实，你这个问题yzhshi的回答基本就可以了。你专门给
我分，实在愧受啊，以后能帮上你的，你尽管说
老大，你千万别叫我“高手”，我水平还很差呀！绝对不是谦虚，和yzhshi相比，
差得不是一点两点啊，其实，你这个问题yzhshi的回答基本就可以了。你专门给
我分，实在愧受啊，以后能帮上你的，你尽管说
Y
yzhshi
Unregistered / Unconfirmed
GUEST, unregistred user!
Hd_Copy，客气，我给提供的程序中BuildVersion有错误，看了你的程序，知道是那个的低位(lWord)，呵呵，没仔细看sdk的帮助
摘抄部分代码。
5 : begin
case dwMinorVersion of
0 : result := 'Windows 2000';
1 : result := 'Windows Whistler';{这个Whistler就是xp，直接改成xp就可以了，其实他就是5.1.2600}
end; // end case
摘抄部分代码。
5 : begin
case dwMinorVersion of
0 : result := 'Windows 2000';
1 : result := 'Windows Whistler';{这个Whistler就是xp，直接改成xp就可以了，其实他就是5.1.2600}
end; // end case
D
duducat
Unregistered / Unconfirmed
GUEST, unregistred user!
接受答案了.