function IsNT: Boolean;
  begin
    Result := (Win32MajorVersion >= 4) and (Win32Platform = VER_PLATFORM_WIN32_NT);
  end;
  const
  MSSQL_98StartCommand = 'scm -action 1 -pwd "%s"';
  MSSQL_NTStartCommand = 'net start mssqlserver';
  MSSQL_98StopCommand = 'scm -action 6';
  MSSQL_NTStopCommand = 'net stop mssqlserver';
  请高手指点这些都是什么意思,从哪里有API函数的资料帮助推荐几个,谢谢