在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 ??
解决方案 »
- 100分:vclskin 的 安装问题.
- 哪有Installshield下载?
- 当代中国大学毕业生地悲哀-人事局强行扣留毕业生档案,是何道理?
- 求indy里的idsmtp控件发邮件的例程,大家邦一下,,
- 如何穿越电信防火墙(代理)实现互连网上的两个电脑通信????
- 在delphi中如何捕获ADO出错消息
- SOS
- 一个任务管理器的问题
- NEMA-0183标准!!!!!!!!
- DELPHI中用程序创建数据库,需要什么控件
- 我又发现一个奇怪的问题,缓存更新中,记录已经applyupdates,提交了。这个记录怎么能 cancdlupdates, 回到修改前的样了,不过记录还在数
- D_Q(A.Dai)给你分!给分原因(内详)
dircomboobox.onclick := fffonclick;请大家去 http://www.new7wonders.com/c/voting.php 投长城一票