[求助]skill数据无法实时显示到from内

evel

(defun create_form_file ();前面from生成函数
...

(defun _Origin_callback (form)
(case form->curField
 ("Origin"
 axlFormMsg(form "Xvalue")
 x=get_select_coords()
 y=get_select_coords()
 axlFormSetField(form "Xvalue" x)
 )

procedure( get_select_coords()
coord_x=nil
coord_y=nil
...

 if( x1==x2
 then
 coord_x=x1
 x=coord_x
println(x)
x
 )
 if( y1==y2 
 then
 coord_y=y1
 y=coord_y
println(y)
y
 )
 )

 (axlClearSelSet)
 axlUIPopupSet(nil)
 )

....

后面是生成form和显示form代码

我奇怪的是x,y的数值我已经取得了,我用;println()都可以看到了.但是无法把他们放到form里面Xvalue和Yvalue中去.大伙帮忙看看.有何需要注意的地方.

功能就是数据实时显示到from内
谢谢!

evel

自己先顶顶.等待大侠出现!

liang431

You can do it with the following sentence:

defun _Origin_callback (form)
(case form->curField
 ("Origin"
 axlFormMsg(form "Xvalue")

 get_select_coords()
 axlFormSetField(form "Xvalue" x)
 )

procedure( get_select_coords()
coord_x=nil
coord_y=nil
...

 if( x1==x2
 then
 coord_x=x1
 x=coord_x
println(x)
x
 )
 if( y1==y2 
 then
 coord_y=y1
 y=coord_y
println(y)
y
 )
 )

 (axlClearSelSet)
 axlUIPopupSet(nil)
 )

....

evel

楼上大侠.我还是疑问,x, y的值我都已经取得而且回传到callback 函数里啦,为什么就是显示不出来呢?我用你的方法好像还是不行,期待大伙一起探讨这个问题
小弟初学,愿意和大家一起进步!

Skill完成之后代码全部奉上, 抛砖引玉!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

liang431

Can you give me you source code? I can check for you.

Defir

虽然还不太懂，慢慢学习了。