Delphi-PRAXiS - Delphi Rechnernamen feststellen

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)

- - Delphi Rechnernamen feststellen (https://www.delphipraxis.net/25206-rechnernamen-feststellen.html)

gkaeberich

2. Jul 2004 19:41

Rechnernamen feststellen

Hallo,

wie kann ich den Netbios-Namen des Rechners, auf dem mein Programm laufen soll, möglichst einfach feststellen ?

Danke

Günther

d3g	2. Jul 2004 19:49

Re: Rechnernamen feststellen

GetComputerName()

Ich hab zwar kein Windows, aber so sollte es gehen:

Delphi-Quellcode:

			funtion GetNetBIOSComputerName(): String;

var

  buf: array[0..MAX_COMPUTERNAME_LENGTH] of Char;

begin

  GetComputerName(@buf, MAX_COMPUTERNAME_LENGTH + 1)

  Result := buf;

end;

gkaeberich

4. Jul 2004 07:53

Re: Rechnernamen feststellen

Danke,

es klappt so in etwas abgewandelter Form

Günther

Alle Zeitangaben in WEZ +1. Es ist jetzt 19:55 Uhr.