有关tabsheet的问题? 假设菜单上有两项:N1和N2,另外有tabsheet1和tabsheet2,两个tabsheet上有各种可视控件,我现在想在N1.click的时候tabsheet1上的控件可以进行各种操作,而tabsheet2上的所有可视控件都是灰色的(也就是说是不可用的),我用了tabsheet2.enable:=false;虽然这时控件不可用,但不是灰色的,看上去比较难过! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我不知道简单的办法,我想只有把所有Tab页标题变灰,不可用,并且把当前Tab页的所有控件逐个不可用吧 把当前Tab页的所有控件逐个不可用吧累是累了点,但我只会这样。 你完全可以隐藏掉,只显示你要显示的页面n1.click tabsheet2.tabvisible := false; 用你的方法仅能使tabsheet本身禁用,控件颜色不能改变,只能将所有的控件一一禁用方可。建议:n1: tabsheet1.show; tabsheet2.hide;n2: tabsheet1.hide; tabsheet2.show; 用一个循环吧for i := 0 to ComponentCount - 1 do begin if TControl(Components[day]).Parent = tabsheet2 then TControl(Components[day]).Enabled := false;end; delphi怎样把.tlb文件编译到工程文件中 dephi安装时错误提示!!! 求取得所有可用com口的代码 @@@请教问题-关于dbgrid插入数据的问题--在线等 高分求救一个控件呀~~~~急急急急急急急急急急急急~~~ 问一个简单的问题 一个不明白的从来没有遇到的delphi问题: Delphi调用win32函数的帮助borland公司提供了吗? 初学者……一个搞不明白的问题 Kingron兄,你站上的Win32 API为何下载不了? 我用decodedate实现,但是不具体! dbchart的问题
累是累了点,但我只会这样。
n1.click tabsheet2.tabvisible := false;
建议:
n1:
tabsheet1.show;
tabsheet2.hide;
n2:
tabsheet1.hide;
tabsheet2.show;
for i := 0 to ComponentCount - 1 do
begin
if TControl(Components[day]).Parent = tabsheet2 then
TControl(Components[day]).Enabled := false;
end;