ネットワークアダプタの一覧表示 (ID:39301)

名前

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

本文 こんにちは．Mr.XRAYです． 既にレスがありますが， 環境を書いていない質問なんて，「ほとんど冗談」ですね(笑) 雑談として発言するのであれば別ですが． >Delphi 2010 proです。 ということですが，DelphiはDelphi 2009からUnicodeになりました． したがって，それよりも前のバージョンで正常動作していたものも 修正が必要なことがあります． リンクにあったにしのさんの，AdaptInfo.pas 内のコードはUnicode以前の ものです． TIPAdapterInfo構造体(レコード型)のCharの部分， AdapterName: array[0..MAX_ADAPTER_NAME_LENGTH + 4 - 1] of AnsiChar;//Char; Description: array[0..MAX_ADAPTER_DESCRIPTION_LENGTH + 4 - 1] of AnsiChar;// Char; をAnsiCharに書き換えてみてください． ペレさんの 2010/10/07(木) 09:19:23 のコードをそのままコピペして 実行したところ，文字化けはしていません． この結果が意味のある結果かどうかは不明です． また，他にも修正が必要が必要かも知れません． 今，ちょっと気になったところだけの修正です． 動作確認環境は，Windows XP(SP3) + Delphi 2010(UP5) Pro です．