在窗口中建了一个SQLtable表。然后在afterload事件中:
Dim t As Table = Tables(e.Form.Name & "_Table1")
t.Fill("Select * From {表1} ",False)
t.AllowEdit = True
Relations.Add("R1",DataTables("表A").DataCols("ID"),t.DataTable.DataCols("AID"))
If t.DataTable.DataCols.Contains("Code") = False Then
t.DataTable.DataCols.add("Code",Gettype(String),"Parent(R1).Code","编号")
End If
打开窗口的时候提示:不存在名称为“窗口1_table1"的table
难道不能在窗口表中自建关联?