Jak w teamcie.
0
0
programowo?
a jak sie to robi sprzętowo? [diabel]
0
Sprzętowo można zmienić nazwę kompa np. ze 'sprzęt' na 'złom' - młotkiem ( im więkzy tym fajniejsza zabawa :> ). Programowo: poszukaj słońce w rejestrze nazwy swego kompa i po prostu zmieniaj wartość klucza, który tą nazwę trzyma.
0
zdaje się, że widziałem to na FAQ
0
Trzeba jeszcze dopowiedzieć jedno:
Jak już się zalogujesz na nazwie kompa np: Blaszak
- by skutecznie zmienić nazwę kompa musisz go zrestetować bo inaczej nadal w sieci będziesz widziany jako "Blaszak"
0
Sorki :) mała poprawka:
- ponownie nie reset a zalogowanie ;)
a poniżej kodzik jak już coś:
//Odczyt nazwy kompa...
PROCEDURE TForm1.WczytajRejestr;
var
reg :TRegistry;
nazwaPC :String;
Begin
reg:= TRegistry.Create;
try
reg.RootKey:=HKEY_LOCAL_MACHINE;
reg.OpenKey('System\CurrentControlSet\Control\ComputerName\ComputerName',false);
nazwaPC:= reg.ReadString('ComputerName');
reg.CloseKey;
finally
reg.Free;
end;
End;
//Zmiana nazwy kompa...
PROCEDURE TForm1.ZapiszRejestr;
var
reg :TRegistry;
nazwaPC :String;
Begin
reg:= TRegistry.Create;
try
reg.RootKey:=HKEY_LOCAL_MACHINE;
reg.OpenKey('System\CurrentControlSet\Control\ComputerName\ComputerName',false);
reg.WriteString('ComputerName',nazwaPC);
reg.CloseKey;
finally
reg.Free;
end;
End;