前段时间，用SQL数据库，在本地测试时，表格没有白屏现象，但通过VPN连接到不同局域网的SQL数据库时，由于网速慢，以前的查询用到表格Grid时，发现有白屏现象。
以前是这样查询的，
sqlexec(nhandle,'select * from sql_table','sql_table')
select * from sql_table into curs  sql_table_tmp readwrite
use in sql_table
select sql_table_tmp
THISFORM.Grid1.RECORDSOURCE=''
THISFORM.Grid1.COLUMNCOUNT = -1
THISFORM.Grid1.RECORDSOURCE=ALIAS()
当重复按查询按钮时，我发现不在同一个局域网时，在查询回来的数据量很大的时候，会出现表格白屏，
今天无意发现，在查询前，先修改表格的数据源，竟然无意解决了这个白屏问题
把以上语句改为。

**清空表格，同时更换数据源，防止查询过程表格出现白屏，没这段会白屏
select * from sql_table_tmp where .f. into curs sql_table_tmp1
select sql_table_tmp1
THISFORM.Grid1.RECORDSOURCE=''
THISFORM.Grid1.COLUMNCOUNT = -1
THISFORM.Grid1.RECORDSOURCE=ALIAS()
thisform.grid1.Refresh

sqlexec(nhandle,'select * from sql_table','sql_table') &&先查询数据到sql_table，不能写的
select * from sql_table into curs  sql_table_tmp readwrite &&把查询数据改为可以写的表去sql_table_tmp
use in sql_table &&关闭临时表
select sql_table_tmp &&表格的数据源sql_table_tmp
THISFORM.Grid1.RECORDSOURCE=''
THISFORM.Grid1.COLUMNCOUNT = -1
THISFORM.Grid1.RECORDSOURCE=ALIAS()
求分享

[此贴子已经被作者于2015-12-13 16:50编辑过]

不错

先查询数据，获得有效的临时表之后再更新表格的数据源如何？

我本来就是，先查询，然后在更新表格的数据源，就是会白屏，（我说的白屏，是连接其他内不同局域网的SQL数据库，由于网速慢，也不是慢，就是没局域网快）
由于，查询按钮可以，查询多次，按第1次，按第2次，对表格来说，他的数据源都是同1个表格，“先查询数据，获得有效的临时表之后再更新表格的数据源如何”他的数据源还是同1个名称。。
但我发现，在内网，就不会白屏，我在查询之前，把表格的数据源更换为其他的数据源后，等到查询数据回来了，再更换会来，就不会出现白屏了。。
至于是什么原因，就不知道了。。

也可以先ZAP清空GRID的数据记录，再 APPEND FROM 查询到的数据进去。

没有显示内容的控件，应在拥有数据内容之后才可视。这其实就是静态设计与动态设计的区别，即我以前说过的，在设计器拖拉控件设计，属于静态的，但现实情况，是有一些画面内容必须（或应该）在运行时根据需要在适当的时候才显现或消隐，那是动态的，静态设计出来的画面，束缚了动态思维，一旦设计时没有控件属性框，你就不知道在哪里和如何书写动态控制代码。

及时更新数据源，就不会发生白屏现象

介绍经验精神可佳。

我查询数据后，马上
THISFORM.Grid1.RECORDSOURCE=''
THISFORM.Grid1.COLUMNCOUNT = -1
THISFORM.Grid1.RECORDSOURCE=ALIAS()
还不算及时啊？同样的程序，用本机（内网）的SQL数据库测试，好像看不到白屏现象，不知道是本地SQL数据库读取快，“白屏”闪就过了还是什么，反正看不到。
但用外网的SQL数据库，在读取回来的数据量比较多的时候，就有，明显的白屏现象，如果回来的数据少的时候，没明显白屏。

按T版的说法，怎么处理?还是用我自己说的方法？查询之前，清空数据，更换数据源？