How to read if Win2000 or Win95/98?
Posted on 2000-04-05
I currently use this code to show the information for Windows 95 and 98.
Reg := TRegistry.Create;
Reg.RootKey := HKEY_LOCAL_MACHINE;
if Reg.OpenKey('\SOFTWARE\Microsoft\Windows\CurrentVersion', FALSE)
then lblOSVersion.Caption := Reg.ReadString('Version') +' (Build: '+Reg.ReadString('VersionNumber')+')';
This works great, unfortunately I do not have Windows NT or 2000 to play around with to make it work on those platforms. I have tried my program on those systems, and when I visit the about box, nothing comes up for the Platform.
What do I need to do to get it to display Windows 2000 or Windows NT or Win95 and Win98 depending on what machine they are on?