type TUserXJYBillForm = class(TCustomBillForm) qParentAddress: TkbmMWClientQuery; qPosition: TkbmMWClientQuery; qUserPosition: TkbmMWClientQuery; qOrg: TkbmMWClientQuery; qNotUse: TkbmMWClientQuery; qCun: TkbmMWClientQuery;
先看上面一個uniForm的代碼，注意qNotUse這一行。
問題的表現：當在Form.OnCreate中，qNotUse這個對象是正常的，我們可以使用他。但是，當在一個事件中，我們訪問這個對象，他就變成了無效的對象。檢查這個窗口的代碼，我沒有釋放這個qNotUse對象的代碼。如果把qNotUse與qCun對調，即把qCun放到qNotUse所在的行，那么這個qCun也會產生象qNotUse一樣問題，而qNotUse則變成正常的。