在Win3.1的Tab里有
TDriveComboBox
TDirectoryListBox
TFileListBox(我安装了FlatStyle控件,有
TFlatListBox & TFlatComboBox)i want use them in Flat Style , so
i do like followedvar
dCBox: TDriveComboBox
dLBox: TDirectoryListBox
fLBox: TFileListBox
DriveComboBox :TFlatComboBox;
DirectoryListBox:TFlatListBox;
FileListBox:TFlatListBox;
begin
fLBox:=TFileListBox.Create(Self);
fLBox.Parent:=Self;
fLBox.Visible:=False; dLBox:=TDirectoryListBox.Create(Self);
dLBox.Parent:=Self;
dLBox.Visible:=False; dCBox:=TDriveComboBox.Create(Self);
dCBox.Parent:=Self;
dCBox.Visible:=False; DriveComboBox.Items.Clear;
DirectoryListBox.Items.Clear;
FileListBox.Items.Clear; DriveComboBox.Items.AddStrings(dCBox.Items);
DirectoryListBox.Items.AddStrings(dLBox.Items);
FileListBox.Items.AddStrings(fLBox.Items);
end;so i got
TDriveComboBox
TDirectoryListBox
TFileListBoxin flat style, but how to write code in DriveComboBox's OnClick
DirectoryListBox's OnClick
FileListBox's OnClickevents ??
TDriveComboBox
TDirectoryListBox
TFileListBox(我安装了FlatStyle控件,有
TFlatListBox & TFlatComboBox)i want use them in Flat Style , so
i do like followedvar
dCBox: TDriveComboBox
dLBox: TDirectoryListBox
fLBox: TFileListBox
DriveComboBox :TFlatComboBox;
DirectoryListBox:TFlatListBox;
FileListBox:TFlatListBox;
begin
fLBox:=TFileListBox.Create(Self);
fLBox.Parent:=Self;
fLBox.Visible:=False; dLBox:=TDirectoryListBox.Create(Self);
dLBox.Parent:=Self;
dLBox.Visible:=False; dCBox:=TDriveComboBox.Create(Self);
dCBox.Parent:=Self;
dCBox.Visible:=False; DriveComboBox.Items.Clear;
DirectoryListBox.Items.Clear;
FileListBox.Items.Clear; DriveComboBox.Items.AddStrings(dCBox.Items);
DirectoryListBox.Items.AddStrings(dLBox.Items);
FileListBox.Items.AddStrings(fLBox.Items);
end;so i got
TDriveComboBox
TDirectoryListBox
TFileListBoxin flat style, but how to write code in DriveComboBox's OnClick
DirectoryListBox's OnClick
FileListBox's OnClickevents ??
解决方案 »
- 如何获得Tif文件的属性
- ehlib 再提一个 memtableeh 的问题,问题在这,高手在哪??
- vb.net2005編寫的DLL文件怎麽在delphi中調用?
- 有谁见过这个VCL
- 如何取得当前打开的所有IE窗口正在访问的URL?
- 关于DBGrid的双击事件问题
- 求助!!delphi能不能做一个转轮盘的游戏????
- 我想,在FORM上按任意键,界面一个数字累加滚动,再按任意键数字停止滚动,如何实现?请教高手!
- INI文件中的VALUE值如果包含有空格,双引号应该怎么处理
- delphi 6安装请教
- 我又发现一个奇怪的问题,缓存更新中,记录已经applyupdates,提交了。这个记录怎么能 cancdlupdates, 回到修改前的样了,不过记录还在数
- D_Q(A.Dai)给你分!给分原因(内详)
dircomboobox.onclick := fffonclick;请大家去 http://www.new7wonders.com/c/voting.php 投长城一票