我有年、月、日、时四个花甲Grid表,每个表的12个地支列Text1的GotFocus方法均有相类似的如下代码:
SELECT 花甲表_年
sum_RC = recno() + 1 && 行号与列号之和
IF sum_RC/2 = int(sum_RC/2) && 是偶数的取之:
Cur_row = iif(RECNO()=10,"a",STR(RECNO(),1))
ThisForm.Text1.Value = "y" + Cur_row + "1" + ALLTRIM(id) + "子>"
ThisForm.Edit1.Value = SUBSTR(子,9)
mcLab_y = ALLTRIM(id) + "子鼠年" && 年标签公共变量
cur_dm_y = Cur_row + "1" && 当前年代码公共变量
* Get_Wuxing() 取五行(金木水火土):
nWx_row = RECNO()
SELECT 0
USE 五行表_年
GO nWx_row
cur_wx_y = LEFT(ALLTRIM(子),2)
WAIT "年" + cur_wx_y WINDOW
USE
SELECT 花甲表_年
ThisForm.gif_y.Picture = SYS(5) + CURDIR() + "gif生肖\1鼠1.gif"
ThisForm.Txt_y.Value = "年" + cur_wx_y
ThisForm.Optiongroup_data.Option1.Enabled = .T. && 年选项按钮可选
ELSE
......
在VFP9环境下运行EXE文件并没有什么问题,在脱离其环境,仅用“gdiplus.dll,msvcr71.dll,vfp9r.dll,vfp9rchs.dll,reportoutput.app,reportpreview.app”拷贝到其路径下运行就列机
而且是运行到“取五行(金木水火土)”代码段时死机,开头写成“Get_Wuxing()”函数,以为GotFocus不支持函数,后来改为上述代码段时也死机
“gdiplus.dll,msvcr71.dll,vfp9r.dll,vfp9rchs.dll,reportoutput.app,reportpreview.app”用于其他程序开发脱离VFP9环境运行却是很正常的
不知为什么,如何解决,敬请老师、高手们指点迷津为盼
谢谢
------解决方案--------------------------------------------------------
尽量不要用 汉化版,不过用 汉化版 的帮助文件还是可以的。
------解决方案--------------------------------------------------------