.NET Framework 版本：2.0.50727.8830
Foxtable 版本：2018.3.9.1
错误所在事件：窗口,serevmain,SizeChanged
详细错误信息：
给定关键字不在字典中。
SizeChanged 中的代码
Forms("serevmain").stopRedraw
Dim frmname As String=e.Form.name
If vars("bswidth")=0 And vars("bsheight")=0 Then
basemainform.left = (SysInfo.WorkingAreaWidth - basemainform.width) / 2
basemainform.top = (SysInfo.WorkingAreaheight - basemainform.height) / 2
Else
basemainform.left = (SysInfo.WorkingAreaWidth - vars("bswidth")) / 2
basemainform.top = (SysInfo.WorkingAreaheight - vars("bsheight")) / 2
End If
Select Case basemainform.windowstate'0 还原 1 最小化 2 最大化
Case 0
If vars("bswidth")=0 And vars("bsheight")=0 Then
basemainform.left = (SysInfo.WorkingAreaWidth - basemainform.width) / 2
basemainform.top = (SysInfo.WorkingAreaheight - basemainform.height) / 2
vars("bswidth")=basemainform.width'第一次还原使用,保证窗口居中
vars("bsheight")=basemainform.height'第一次还原使用,保证窗口居中
End If
End Select
Forms("serevmain").ResumeRedraw
加好友 
发短信
Post By：2018/6/10 19:26:00 [显示全部帖子]
