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

解決

どしろうと 2007-06-22 03:03:26 No: 26790

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

GTR 2007-06-22 03:20:27 No: 26791

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;

で、どうでしょうか？

ＧＴＲ 2007-06-22 03:22:46 No: 26792

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

どしろうと 2007-06-22 03:47:22 No: 26793

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