RAD Studio VCL Reference
|
Specifies the drive which contains the files listed in the list box.
property Drive: char;
__property char Drive;
Set the value of Drive to the drive that contains the files that the list box should display. When the value of Drive changes, the Directory value also changes to the current directory on the specified drive.
If the form includes a TDirectoryListBox object, set the FileList property of the directory list box to have the Drive property updated automatically when the Drive property of the directory list box changes.
C++ Examples:
/* 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 and the OnChange event handler for the directory list 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. When the user double clicks on a directory in the file list box will update to reflect the new directory. */ void __fastcall TForm1::DriveComboBox1Change(TObject *Sender) { DirectoryListBox1->Drive = DriveComboBox1->Drive; FileListBox1->Drive = DriveComboBox1->Drive; FileListBox1->Directory = DirectoryListBox1->Directory; } void __fastcall TForm1::DirectoryListBox1Change(TObject *Sender) { FileListBox1->Directory = DirectoryListBox1->Directory; }
Delphi Examples:
{ 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 and the OnChange event handler for the directory list 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. When the user double clicks on a directory in the file list box will update to reflect the new directory. } procedure TForm1.DirectoryListBox1Change(Sender: TObject); begin FileListBox1.Directory := DirectoryListBox1.Directory; end; procedure TForm1.DriveComboBox1Change(Sender: TObject); begin DirectoryListBox1.Drive := DriveComboBox1.Drive; FileListBox1.Drive := DriveComboBox1.Drive; FileListBox1.Directory := DirectoryListBox1.Directory; end;
Copyright(C) 2009 Embarcadero Technologies, Inc. All Rights Reserved.
|
What do you think about this topic? Send feedback!
|