Computernamen ändern |
|
| System | Win9x, WinNT, Win2000, WinXP, Vista, Win7 |
|---|---|
| Ab Delphi-Version | Delphi 1 |
| Letzte Änderung | 28.09.2010 |
Dieses Beispiel zeigt, wie man den Namen, mit dem der Computer im Windows-Netzwerk sichtbar ist, ändern kann. Der Name ist erst gültig, nachdem das System neu gestartet wurde.
procedure NeuerComputerName(name: string);
begin
if name<=MAX_COMPUTERNAME_LENGTH then
SetComputerName(PChar(Edit1.Text))
else
ShowMessage('Der Name ist zu lang!');
end;