delphi修改系统计算机名称

软件随即产生一个8位的值，并修改计算机名称。无需重启即可生效。

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        234  2018-11-25 15:20  修改计算机名称\Project4.dpr

     文件      29245  2018-11-25 15:20  修改计算机名称\Project4.dproj

     文件       1992  2018-11-25 15:20  修改计算机名称\Project4.dproj.local

     文件        117  2018-11-25 16:10  修改计算机名称\Project4.identcache

     文件      59412  2018-11-25 15:26  修改计算机名称\Project4.res

     文件        160  2018-11-25 16:10  修改计算机名称\Project4.stat

     文件        637  2018-11-25 15:18  修改计算机名称\Unit2.dfm

     文件       1563  2018-11-25 15:20  修改计算机名称\Unit2.pas

     文件   11358208  2018-11-25 15:37  修改计算机名称\Win32\Debug\Project4.exe

     文件       6687  2018-11-25 15:37  修改计算机名称\Win32\Debug\Unit2.dcu

     目录          0  2018-11-25 15:26  修改计算机名称\Win32\Debug

     目录          0  2018-11-25 15:26  修改计算机名称\Win32

    ...D.H.         0  2018-11-25 15:20  修改计算机名称\__history

    ...D.H.         0  2018-11-25 16:10  修改计算机名称\__recovery

     目录          0  2018-11-25 15:36  修改计算机名称

----------- ---------  ---------- -----  ----

             11458255                    15