Delphi FAQ: Win32のコンピュータ名の取得

１５番会議室「ＦＡＱ編纂委員会」に寄せられた「よくある質問の答え」

[Ｑ]
Win95のネットワークの、現在のコンピュータ名を取得したいのですがどうすれば良いですか

[Ａ]

Win32APIのGetComputerNameを使って取得します。

function GetComputerName(lpBuffer: PChar; var nSize: DWORD): BOOL;

[例]

var
  ComputerName: array[0..14] of Char;
  Size: DWORD;
begin
  Size:= MAX_COMPUTERNAME_LENGTH + 1;
  GetComputerName(ComputerName, Size);
  ShowMessage(ComputerName);
end;

ここにあるドキュメントは NIFTY SERVEの Delphi Users' Forum FDELPHIに寄せられる質問の中から、よくある質問への回答を FDELPHIのメンバーがまとめたものです。　したがって、これらの回答はボーランド株式会社がサポートする公式のものではなく、掲示されている内容についての問い合わせは受けられない場合があります。