我在两个大的panel上 放了 80个panel 然后 定义了一个数组 PN: array[1..80] of TPanel; 在窗体FormCreate事件里把 panel 传给panel数组
像这样
PN[1] :=Panel1;
PN[2] :=Panel2;
PN[3] :=Panel3;
PN[4] :=Panel4;
PN[5] :=Panel5;
PN[6] :=Panel6;
PN[7] :=Panel7;
PN[8] :=Panel8;
...
...
...
PN[80] :=Panel80;但是 为什么有些panel就无法用代码改变其颜色属性 像
PN[78].color:=RGB(255,0,0);
Panel78.color:=RGB(255,0,0)
像这样
PN[1] :=Panel1;
PN[2] :=Panel2;
PN[3] :=Panel3;
PN[4] :=Panel4;
PN[5] :=Panel5;
PN[6] :=Panel6;
PN[7] :=Panel7;
PN[8] :=Panel8;
...
...
...
PN[80] :=Panel80;但是 为什么有些panel就无法用代码改变其颜色属性 像
PN[78].color:=RGB(255,0,0);
Panel78.color:=RGB(255,0,0)
解决方案 »
- treeview使用求教````````````````
- 求助一款sql查询工具的名称
- 如果判断一个FORM里面是否有某个控件
- 这个server触发不了OnClientRead事件,请问如何改?
- 用VC6开发的DLL,如何在delphi call Dll的里带类的function?
- 谁有能访问FIREBIRD 1.5的免费 DBEXPRESS FOR FIREBIRD 1.5 重谢啊
- 大家好!急问:语言选择!在线等待!多谢!!!
- 新手询问关于点击鼠标右键,出现菜单的问题。
- 问两个很菜的问题
- S0S!!!!高分求救!!!急!急!!如何统计一个表中的记录?具体是这样的:一个表中的字段有:编号、厂名、、、、
- 图片裁剪的三种方法,哪个更快更好?
- DataAccess / TClientDataSet 这个控件有什么作用
Form1: TForm1;
pn: array [1..3] of TPanel; //定义数组变量
implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
VAR
i:integer;
begin
PN[1]:= Panel1;
PN[2]:= Panel2;
PN[3]:= Panel3;
''''
''''
PN[80]:= Panel3;
for i:=1 to 80 do pn[i].Color:=rgb(255,0,0);
end;