请问各位大虾,多个Panel空间叠加(注意是多个Panel相互叠加在其他上面!),如何通过Combobox每选一个显示一个Panel?
我用的是:
if combobox1.itemindex=0
then begin
panel1.visible:=true;
panel2.visible:=false;
panel3.visible:=false;
end;
if combobox2.itemindex=1
then begin
panel2.visible:=true;
panel1.visible:=false;
panel3.visible:=false;
end;
if combobox1.itemindex=2
then begin
panel3.visible:=true;
panel1.visible:=false;
panel2.visible:=false;
end;
以上代码不能实现,请高手执教!
我用的是:
if combobox1.itemindex=0
then begin
panel1.visible:=true;
panel2.visible:=false;
panel3.visible:=false;
end;
if combobox2.itemindex=1
then begin
panel2.visible:=true;
panel1.visible:=false;
panel3.visible:=false;
end;
if combobox1.itemindex=2
then begin
panel3.visible:=true;
panel1.visible:=false;
panel2.visible:=false;
end;
以上代码不能实现,请高手执教!
解决方案 »
- 普通Dll如何实现一个预定义的COM接口
- delphi中dbgrid默认双击能修改里面的内容,怎么关闭这个功能
- 周末散分,祝各位D友周末愉快!加班钱多多!
- 新手学delphi7应该买什么书?
- 各位大虾,我的程序需要每小时保存一次数据,请问有哪些常用的做法
- 请高手指点,这段条件代码怎么写?
- 请问各位老大,怎么把TFileTime类型的变量转换成yyyy-mm-dd的格式,TFileTime中的dwLowDateTime和dwHighDateTime是什么意思
- 在DELPHI7.0中,为什么找不到QReport组件页。
- 请问:用QuickRep做的报表能存成*.Rtf格式的文档吗?
- 在程序中如何等待一个打印任务结束?(见详细内容)
- 【求助】为什么断点不起作用?
- 老问题,指针问题!
操作1:先将所有的panel的VISIBLE属性设置为FALSE;然后 case combobox1.itemindex of
0:panel0.visible:=TRUE;
1:panel1.visible:=TRUE;
.
.
end;
END;
begin
showmessage(inttostr(combobox1.itemindex));
end;
0: panel1.BringToFront;
1: panel2.BringToFront;
2: panel3.BringToFront;
...
end;