原来Delphi已经给我们做好了

 今天随便翻了翻Delphi的Source文件夹，这里有Delphi提供的各个单元，一看不打紧，猛拍偶头，差点晕倒

原来Delphi把好多我们常用的东西都给做好了，只是我们没发现而已，例如注册表中那些比较重要的键、值，以前

都要打开注册表--->复制项什么的拷贝出来在粘贴阿之类，而且有的键还相当长，这些都在regstr.pas单元里多有了

的，慨叹当初没好好翻翻，下面我就贴出一些:

{ Public registry paths }

  {$EXTERNALSYM REGSTR_DEFAULT_INSTANCE}
  REGSTR_DEFAULT_INSTANCE     = '0000';
  {$EXTERNALSYM REGSTR_PATH_MOTHERBOARD}
  REGSTR_PATH_MOTHERBOARD     = REGSTR_KEY_SYSTEMBOARD + '/' + REGSTR_DEFAULT_INSTANCE;
  {$EXTERNALSYM REGSTR_PATH_SETUP}
  REGSTR_PATH_SETUP           = 'Software/Microsoft/Windows/CurrentVersion';
  {$EXTERNALSYM REGSTR_PATH_PIFCONVERT}
  REGSTR_PATH_PIFCONVERT      = 'Software/Microsoft/Windows/CurrentVersion/PIFConvert';
  {$EXTERNALSYM REGSTR_PATH_MSDOSOPTS}
  REGSTR_PATH_MSDOSOPTS       = 'Software/Microsoft/Windows/CurrentVersion/MS-DOSOptions';
  {$EXTERNALSYM REGSTR_PATH_MSDOSEMU}
  REGSTR_PATH_MSDOSEMU        = 'Software/Microsoft/Windows/CurrentVersion/MS-DOS Emulation';
  {$EXTERNALSYM REGSTR_PATH_NOSUGGMSDOS}
  REGSTR_PATH_NOSUGGMSDOS     = 'Software/Microsoft/Windows/CurrentVersion/NoMSDOSWarn';
  {$EXTERNALSYM REGSTR_PATH_NEWDOSBOX}
  REGSTR_PATH_NEWDOSBOX       = 'Software/Microsoft/Windows/CurrentVersion/MS-DOSSpecialConfig';
  {$EXTERNALSYM REGSTR_PATH_RUNONCE}
  REGSTR_PATH_RUNONCE         = 'Software/Microsoft/Windows/CurrentVersion/RunOnce';
  {$EXTERNALSYM REGSTR_PATH_RUN}
  REGSTR_PATH_RUN             = 'Software/Microsoft/Windows/CurrentVersion/Run';
  {$EXTERNALSYM REGSTR_PATH_RUNSERVICESONCE}
  REGSTR_PATH_RUNSERVICESONCE         = 'Software/Microsoft/Windows/CurrentVersion/RunServicesOnce';
  {$EXTERNALSYM REGSTR_PATH_RUNSERVICES}
  REGSTR_PATH_RUNSERVICES             = 'Software/Microsoft/Windows/CurrentVersion/RunServices';
  {$EXTERNALSYM REGSTR_PATH_EXPLORER}
  REGSTR_PATH_EXPLORER        = 'Software/Microsoft/Windows/CurrentVersion/Explorer';
  {$EXTERNALSYM REGSTR_PATH_DETECT}
  REGSTR_PATH_DETECT          = 'Software/Microsoft/Windows/CurrentVersion/Detect';
  {$EXTERNALSYM REGSTR_PATH_APPPATHS}
  REGSTR_PATH_APPPATHS        = 'Software/Microsoft/Windows/CurrentVersion/App Paths';
  {$EXTERNALSYM REGSTR_PATH_UNINSTALL}
  REGSTR_PATH_UNINSTALL       = 'Software/Microsoft/Windows/CurrentVersion/Uninstall';
  {$EXTERNALSYM REGSTR_PATH_REALMODENET}
  REGSTR_PATH_REALMODENET     = 'Software/Microsoft/Windows/CurrentVersion/Network/Real Mode Net';
  {$EXTERNALSYM REGSTR_PATH_NETEQUIV}
  REGSTR_PATH_NETEQUIV        = 'Software/Microsoft/Windows/CurrentVersion/Network/Equivalent';
  {$EXTERNALSYM REGSTR_PATH_CVNETWORK}
  REGSTR_PATH_CVNETWORK     = 'Software/Microsoft/Windows/CurrentVersion/Network';

  {$EXTERNALSYM REGSTR_PATH_IDCONFIGDB}
  REGSTR_PATH_IDCONFIGDB      = 'System/CurrentControlSet/Control/IDConfigDB';
  {$EXTERNALSYM REGSTR_PATH_CLASS}
  REGSTR_PATH_CLASS           = 'System/CurrentControlSet/Services/Class';
  {$EXTERNALSYM REGSTR_PATH_DISPLAYSETTINGS}
  REGSTR_PATH_DISPLAYSETTINGS     = 'Display/Settings';
  {$EXTERNALSYM REGSTR_PATH_FONTS}
  REGSTR_PATH_FONTS               = 'Display/Fonts';
  {$EXTERNALSYM REGSTR_PATH_ENUM}
  REGSTR_PATH_ENUM            = 'Enum';
  {$EXTERNALSYM REGSTR_PATH_ROOT}
  REGSTR_PATH_ROOT            = 'Enum/Root';
  {$EXTERNALSYM REGSTR_PATH_SERVICES}
  REGSTR_PATH_SERVICES        = 'System/CurrentControlSet/Services';
  {$EXTERNALSYM REGSTR_PATH_VXD}
  REGSTR_PATH_VXD             = 'System/CurrentControlSet/Services/VxD';
  {$EXTERNALSYM REGSTR_PATH_IOS}
  REGSTR_PATH_IOS         = 'System/CurrentControlSet/Services/VxD/IOS';
  {$EXTERNALSYM REGSTR_PATH_VMM}
  REGSTR_PATH_VMM             = 'System/CurrentControlSet/Services/VxD/VMM';
  {$EXTERNALSYM REGSTR_PATH_VPOWERD}
  REGSTR_PATH_VPOWERD         = 'System/CurrentControlSet/Services/VxD/VPOWERD';
  {$EXTERNALSYM REGSTR_PATH_VNETSUP}
  REGSTR_PATH_VNETSUP         = 'System/CurrentControlSet/Services/VxD/VNETSUP';
  {$EXTERNALSYM REGSTR_PATH_NWREDIR}
  REGSTR_PATH_NWREDIR         = 'System/CurrentControlSet/Services/VxD/NWREDIR';
  {$EXTERNALSYM REGSTR_PATH_NCPSERVER}
  REGSTR_PATH_NCPSERVER       = 'System/CurrentControlSet/Services/NcpServer/Parameters';

  {$EXTERNALSYM REGSTR_PATH_IOARB}
  REGSTR_PATH_IOARB           = 'System/CurrentControlSet/Services/Arbitrators/IOArb';
  {$EXTERNALSYM REGSTR_PATH_ADDRARB}
  REGSTR_PATH_ADDRARB         = 'System/CurrentControlSet/Services/Arbitrators/AddrArb';
  {$EXTERNALSYM REGSTR_PATH_DMAARB}
  REGSTR_PATH_DMAARB          = 'System/CurrentControlSet/Services/Arbitrators/DMAArb';
  {$EXTERNALSYM REGSTR_PATH_IRQARB}
  REGSTR_PATH_IRQARB          = 'System/CurrentControlSet/Services/Arbitrators/IRQArb';

  {$EXTERNALSYM REGSTR_PATH_CODEPAGE}
  REGSTR_PATH_CODEPAGE                                = 'System/CurrentControlSet/Control/Nls/Codepage';
  {$EXTERNALSYM REGSTR_PATH_FILESYSTEM}
  REGSTR_PATH_FILESYSTEM                              = 'System/CurrentControlSet/Control/FileSystem';
  {$EXTERNALSYM REGSTR_PATH_FILESYSTEM_NOVOLTRACK}
  REGSTR_PATH_FILESYSTEM_NOVOLTRACK           = 'System/CurrentControlSet/Control/FileSystem/NoVolTrack';
  {$EXTERNALSYM REGSTR_PATH_CDFS}
  REGSTR_PATH_CDFS                                            = 'System/CurrentControlSet/Control/FileSystem/CDFS';
  {$EXTERNALSYM REGSTR_PATH_WINBOOT}
  REGSTR_PATH_WINBOOT                                     = 'System/CurrentControlSet/Control/WinBoot';
  {$EXTERNALSYM REGSTR_PATH_INSTALLEDFILES}
  REGSTR_PATH_INSTALLEDFILES                          = 'System/CurrentControlSet/Control/InstalledFiles';
  {$EXTERNALSYM REGSTR_PATH_VMM32FILES}
  REGSTR_PATH_VMM32FILES                              = 'System/CurrentControlSet/Control/VMM32Files';

 

还有很多很多，自己去看吧