新版请教 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

大师：终于发现问题了，新版本打开老项目后，发现只要修改项目事件，如准备加载内部表时执行事件，重新打开项目后，有些表主键就没有了。为何？？

有关调用实时(JIT)调试而不是此对话框的详细信息，

请参见此消息的结尾。

************** 异常文本 **************

System.NullReferenceException: 未将对象引用设置到对象的实例。

在 Foxtable.Col.get_AllowEdit()

在 Foxtable.oOO　　　o　.o_Oo_O__(Object A_0, RowColEventArgs A_1, RecordGrid A_2)

在 Foxtable.oOO　　　o　.o　　　　O　O(Object A_0, RowColEventArgs A_1)

在 C1.Win.C1FlexGrid.C1FlexGridBase.OnBeforeEdit(RowColEventArgs e)

在 C1.Win.C1FlexGrid.C1FlexGridBase.#ndb(Int32 #j, Int32 #l)

在 C1.Win.C1FlexGrid.C1FlexGridBase.DrawCell(Graphics #AA, Int32 #j, Int32 #l, Style #aE, Rectangle #o5, String #gM, Image #Ak, CheckEnum #bdb)

在 C1.Win.C1FlexGrid.C1FlexGridBase.DrawCell(PaintEventArgs e, Int32 row, Int32 col)

在 C1.Win.C1FlexGrid.C1FlexGrid.DrawCell(PaintEventArgs e, Int32 row, Int32 col)

在 C1.Win.C1FlexGrid.C1FlexGrid.DrawRow(PaintEventArgs e, Int32 row)

在 C1.Win.C1FlexGrid.C1FlexGridBase.#adb(PaintEventArgs #tQ)

在 C1.Win.C1FlexGrid.C1FlexGridBase.OnPaint(PaintEventArgs e)

在 System.Windows.Forms.Control.PaintWithErrorHandling(PaintEventArgs e, Int16 layer, Boolean disposeEventArgs)

在 System.Windows.Forms.Control.WmPaint(Message& m)

在 System.Windows.Forms.Control.WndProc(Message& m)

在 C1.Win.C1FlexGrid.Util.BaseControls.ScrollableControl.WndProc(Message& m)

在 System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)

在 System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)

在 System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)

请问：这是什么原因？

老版本在准备加载内部表时的执行事件中，有条件加载表的代码。在新版本中取消此事件的代码后，加载的表部分就没有主键了。

老版本中BeforeLoadInnerTable的代码为：

e.HideSplashForm = True
If e.DataTableName = "表a" Or e.DataTableName = "jcsjdatatable" Or e.DataTableName = "任务主表" Then
e.Cancel = False
Else
e.Cancel = True
End If

计划中代码
If DataTables.Contains("zba") = False Then
Functions.Execute("datatablesload","zba")
End If

If DataTables.Contains("zaa") = False Or DataTables.Contains("zab") = False Then
DataTables.Load("zaa|zab") ‘---关联表
End If
If DataTables.Contains("zac") = False Or DataTables.Contains("zad") = False Then
DataTables.Load("zac|zad")
End If
If DataTables.Contains("dttzfl") = False Or DataTables.Contains("dttzflmxb") = False Then
DataTables.Load("dttzfl|dttzflmxb")
End If
If DataTables.Contains("hbdttzfl") = False Or DataTables.Contains("hbdttzflmxb") = False Then
DataTables.Load("hbdttzfl|hbdttzflmxb")
End If

Dim kz As String
Dim bjh As new List(of String)
bjh = DataTables("jcsjdatatable").GetValues("dstatablename","dstatablename is not null","_sortkey") ’---获取所有表的集合
For Each bj As String In bjh
If bj <> "zab" And bj <> "zad" And bj <> "zaa" And bj <> "zac" And bj <> "zba" And bj <> "dttzfl" And bj <> "dttzflmxb" And bj <> "hbdttzfl" And bj <> "hbdttzflmxb" Then
If DataTables.Contains(bj) = False Then
Functions.Execute("datatablesload",bj)
End If
End If
kz = bj
Next

If kz = bjh(bjh.Count - 1) Then
MyTimers("loaddatatable").Enabled = False
End If

在新版本中，删除计划中的代码，删除BeforeLoadInnerTable中的代码。
请问某些表主键就没有了。

老版本就没有问题？？？？？

新版本如果不改动，运行就没有问题。老版本改动与不改动都没有问题？究竟为何？

就是去掉后，新版本不行，项目打开后，一点击有些表就显示没有identity列。显示以上错误信息？？

去掉也不行，还是用老版本吧！等新版本更新完再说！

问题终于解决了，整整3天呀。请问出现问题究竟是怎样重启项目？

修改项目属性后，自动重启项目有问题的情况下，我都是删除bin重试的。测试了不知多少次都不行

当自动重启项目有问题后，如果不删除bin,再重新打开项目就行了。为何？

那为什么我修改项目事件代码后，不按ctrl,项目也能自动重启？

我想跳楼，主要是两个月工作较忙，没碰狐表，都忘记了。

也就是说如果项目打开后运行有问题。

1、关闭项目

2、按ctrl打开项目后修改代码后关闭项目

3、重新打开项目测试

主题：新版请教