void  __fastcall  TForm1::FormCreate(TObject  *Sender)  
{  
   char  name[256];  
   unsigned  long  length;  
   GetComputerName(name,&length);  
 
   Edit1->Text=    Edit1->Text+name;  
}  
//---------------------------------------------  
 
void  __fastcall  TForm1::Button1Click(TObject  *Sender)  
{  
     SetComputerName(Edit1->Text.c_str()  );  
}  
//  
 
以上代码在xp下运行以后,重启系统,发现计算机名没有改变  
找了半天  
在其他里有一个netbios计算机名,给改了  
晕倒中  
 
救高手现身说法

解决方案 »

  1.   

    显示的主机名(改了以后,马上在我的电脑属性里显示
    [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters]
    "NV Hostname"="T6600"
    "Hostname"="T6600"
    NETBIOS名称
    [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName]
    "ComputerName"="T6600"[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\ComputerName\ActiveComputerName]
    "ComputerName"="T6600"
    再请教如何把分给自己?