首页 / 软件开发 / Delphi / Delphi调用WinAPI: SetComputerName - 更改计算机名称

Delphi调用WinAPI: SetComputerName - 更改计算机名称2012-04-04 cnblogs 万一//声明:

SetComputerName（
lpComputerName: PChar {新名称串指针}
）: BOOL;

//举例:

var
s: string;
begin
s := "NewName";
if SetComputerName（PAnsiChar（s）） then
ShowMessage（s）
else
ShowMessage（"改名失败"）;
end;

{改名成功后, 重新启动计算机后才有效}