If (GetVersion() and $80000000)<>0 then
  //  ...'Windows 95/98'...
else
  //   ... 'Windows NT'...
end;