{
Drive, Directory example
The following example assumes that a drive combo box, a file list box, and a directory list
box are on a form. Add this code as the OnChange event handler for the drive combo box.  
When the user changes the drive using the combo box, the directory list box and file list 
box will update to reflect the new drive and the current directory on that drive.
} 
procedure TForm1.DriveComboBox1Change(Sender: TObject);
begin
  DirectoryListBox1.Drive := DriveComboBox1.Drive;
  FileListBox1.Drive := DriveComboBox1.Drive;
  FileListBox1.Directory := DirectoryListBox1.Directory;
end; 
