跟踪分析了好一会儿, 问题的焦点集中在了TDBGrid 上的一个什么Layout 的处理上, 真是让人头昏它那里面那些判断及消息机制太复杂, 也许就是这样影响了它的 效率。我改用了一个StringGrid, 显示TClientData 代码如下, with ClientDataSet1 do begin for j:=1 to Fields.Count do begin Grid.Cells[j,0]:=Fields[j-1].DisplayName; end; for i :=1 to RecordCount do begin for j:=1 to Fields.Count do begin Grid.Cells[j,i]:=Fields[j-1].AsString; end; next; end; 用这样处理是不用出现三次就停止显示的问题。 我不会就这样就了事的。。
ClientDataSet1.applyupdates(0);
ClientDataSet1.ensableControls;
是这样吗?可是还是不行?
2)如果是你的程序造成的,那么请检查你的程序,是否存在上述问题。
给个mail我将原程序发给你看一下行吗?
程序很小,因为我还没编什么了就出现这种错误,我不知如何继续下去。
那个地址不方便现在说,赫赫
[email protected] 也是你的吗?
[email protected]
跟踪分析了好一会儿, 问题的焦点集中在了TDBGrid 上的一个什么Layout 的处理上,
真是让人头昏它那里面那些判断及消息机制太复杂, 也许就是这样影响了它的
效率。我改用了一个StringGrid,
显示TClientData 代码如下, with ClientDataSet1 do
begin
for j:=1 to Fields.Count do
begin
Grid.Cells[j,0]:=Fields[j-1].DisplayName;
end;
for i :=1 to RecordCount do
begin
for j:=1 to Fields.Count do
begin
Grid.Cells[j,i]:=Fields[j-1].AsString;
end;
next;
end;
用这样处理是不用出现三次就停止显示的问题。
我不会就这样就了事的。。
没有升级的在用listview时,会有这样的提示。