コンピュータＩＤを取得するには？

解決

---

クライアントＰＣのコンピュータＩＤ（端末ＩＤ）をdelphiで取得することは可能でしょうか。可能な場合、ご教示願えませんでしょうか。

編集    削除

---

var
   lpbuffer: PChar;
   nsize: DWORD;
   ComputerName : String;
begin
   // コンピュータ名のための領域確保
   nsize := 255;
   GetMem(lpbuffer, nsize + 1);
   try
     // コンピュータ名の取得
     if Windows.GetComputerName(lpbuffer, nsize) then
     ComputerName := lpbuffer;
   finally
     // コンピュータ名のための領域破棄
     FreeMem(lpbuffer);
   end;
end;

で、どうでしょうか？

編集    削除

---

先程の発言は自分のコンピュータ名でした。
間違えて済みません。

編集    削除

---

ありがとうございました。出来ました！

編集    削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。