1、
在B的init中:
thisform.grid1.recordsource='&cNAME'

解决方案 »

  1.   

    liuri:呵呵,这样同样行不通呢,我试验过的,不过我仍要对你表示由衷的感谢
      

  2.   

    在B的init中
    thisform.grid1.recordsource='&papa1'
    thisform.refresh
      

  3.   

    1. 在B的INIT中写(其实效果和上面的差不多):WITH ThisForm.Grid1
       .RecordSource = papa1
       ** 建立循环将table的Field绑定到Grid1上
       FOR i = 1 TO FCOUNT(para1)
          cColumnName = ".Column" + ALLTRIM(STR(i))
          &cColumnName..ControlSource = FIELD(i)
       ENDFOR
       .Refresh
    ENDWITH2.既然你要对这些字段进行校验,那么就知道哪些字段要通过哪些校验,解决的办法就是写一个通用的校验程序,把所有的检验都写在这个程序里,根据表和字段来确定用哪个检验程序来检验,要实现这个功能,Grid.Column.TextBox需要使用类来实现。另外一个办法就是针对不同的字段写一个专用TextBox类,在生成Grid的时候用自定义的TextBox类替换Grid中默认的TextBox,这是个很麻烦的事呀。