Netzwerk - Erkennen welcher Computer Programm ausführt

[mjustin]

GetComputerName in der Windows API:

Delphi-Quellcode:

function ComputerName : String;
var
  buffer: array[0..255] of char;
  size: dword;
begin
  size := 256;
  if GetComputerName(buffer, size) then
    Result := buffer
  else
    Result := ''
end;