Netzwerkname pc ermitteln

moin leute
ich möchte gerne das folgende in c++ haben weis jemand wie das geht=?

//ermitteln und anzeigen systeminformationen
procedure TForm2.FormActivate(Sender: TObject);
var u: array[0…20] of Char; sz:smiley:Word;
begin
//eingeloggten user ermitteln
sz:=SizeOf(u);
GetUserName(u,sz); UserName := u;
//netzwerkname pc ermitteln
GetComputerName(u,sz); PCName := u;
//alles anzeigen
MsgEdit.EditLabel.Caption := UserName + ‚@‘ + PCName;
//Netzwerkpfad setzen
KlassName := ‚FGB02‘;
nwPath := ‚s:\Vollzeit‘ + KlassName + ‚_PUBLIC_‘;
//da s: nicht installiert ist, lieber einen relativen Pfad
//vom Projektverzeichnis nach _public_ anlegen
//pcname als dateinamen anhängen mit erweiterung ‚.html‘
end;