Drive(DriveListBox)

Driveプロパティは DriveListBox(リストボックス!?)の現在のドライブ名を返します。Delphi では TDriveComboBoxの「Drive」プロパティを使用します。このプロパティは Char型なのでアルファベット一文字しか扱いません。また, Delphiの DriveConboBoxコンポーネントには DirListプロパティと言うものがあり, ここに DirectoryListBoxを指定すればいちいちドライブが変更されたらディレクトリリストボックスの内容も変更すると言う処理を記述しなくても自動で反映されるようになります。
■ Driveの使用例
  procedure TForm1.Button1Click(Sender: TObject);
  begin
    {選ばれているドライブを表示}
    ShowMessage (DriveComboBox1.Drive);
  end;

  procedure TForm1.Button2Click(Sender: TObject);
  var
    strPath : string;
  begin
    {アプリケーションのパスを取得}
    strPath :=  ExtractFilePath(Application.ExeName);
    {そのパスの一バイト目, 要するにドライブ名を設定}
    DriveComboBox1.Drive  :=  strPath[1];
  end;                                                    