比如我用一个for循环,给单元格中的值赋值
for n:=0 to IrrAreaSum-1 do
begin
cxGrid1TableView1.DataController.Values[n, 0]:=n+1;
cxGrid1TableView1.DataController.Values[n, 1]:=n+1;
cxGrid1TableView1.DataController.Values[n, 2]:=n+1;
cxGrid1TableView1.DataController.Values[n, 3]:=N+1; end;
当IrrAreaSum值100的话,时间会很长。。请问有其他的写法,能提高赋值的效率么??操作还没有涉及到数据库操作,仅仅显示界面的单元格赋值。。求大神们帮忙。。谢谢delphi,cxgrid
for n:=0 to IrrAreaSum-1 do
begin
cxGrid1TableView1.DataController.Values[n, 0]:=n+1;
cxGrid1TableView1.DataController.Values[n, 1]:=n+1;
cxGrid1TableView1.DataController.Values[n, 2]:=n+1;
cxGrid1TableView1.DataController.Values[n, 3]:=N+1; end;
当IrrAreaSum值100的话,时间会很长。。请问有其他的写法,能提高赋值的效率么??操作还没有涉及到数据库操作,仅仅显示界面的单元格赋值。。求大神们帮忙。。谢谢delphi,cxgrid
解决方案 »
- 大家说说严隆平这个技术人员的年收入有马明哲高吗?
- 自动点击
- 请问谁有真正的图片的翻页效果???或者水波效果~~~对处理图片有经验的进来~~!!
- fastreport 怎样能在最后补充空行?每页合计?600分(另开)
- 请问这句话为何不能执行。谢谢。
- 可否在Delphi中實現將Excel中的數據導入到SQL Server或Access中?
- DBEdit控件是对应数据库的某一个字段,但是有个问题:它会把记录中的空格都显示出来,要去掉其中的空格,并修改其中的记录,该怎么做?
- 有没有类似于这样的combobox控件
- DELPHI的人气不旺了,小伙伴们快回来吧!
- 一个关于CHAR字符的奇怪现象,请高手解释
- delphi QReport预览正常 打印是qrlable内容显示残缺 怎么回事
- 窗体问题
cxGrid1TableView1.BeginUpdate;
...
cxGrid1TableView1.EndUpdate; cxGrid1TableView1.DataController.BeginUpdate;
...
cxGrid1TableView1.DataController.EndUpdate;
就会达到你想要的效果了。
cxGrid1TableView1.BeginUpdate;
for n := 0 to IrrAreaSum - 1 do
begin
cxGrid1TableView1.DataController.Values[n, 0] := n + 1;
cxGrid1TableView1.DataController.Values[n, 1] := n + 1;
cxGrid1TableView1.DataController.Values[n, 2] := n + 1;
cxGrid1TableView1.DataController.Values[n, 3] := N + 1;
end;
cxGrid1TableView1.EndUpdate;