割り当てている
ネットワークドライブを調べる

現在ローカルに割り当てているネットワークドライブを調べるには WNetGetConnection APIを使います。以下の例はＡドライブからＺドライブまで調べてネットワークドライブの名前をリストボックスに表示します。

■ 割り当てているネットワークドライブを調べる例 
  procedure TForm1.Button5Click(Sender: TObject);
  var
    chrDrive  : char;
    strLocal  : string;
    chrRemote : array [0..MAX_PATH] of Char;
    BuffSize  : integer;
  begin
    for chrDrive  :=  'a' to  'z' do  begin
      strLocal    :=  chrDrive + ':';
      BuffSize    :=  SizeOf(chrRemote);
      if  WNetGetConnection(PChar(strLocal),chrRemote,BuffSize) = NO_ERROR then  begin
        ListBox1.Items.Add(strLocal + chrRemote);
      end;
    end;
  end;

WNetGetConnection APIはドライブひとつずつしかチェックできません。第一引数には調べるドライブをコロンをつけて渡します(Ａ：)。第2引数には戻り値が入ります。