Question

我试图在标签中绘制一个isigraph。

到目前为止，我有以下代码（我从gl2和标签演示中修改过）：

NB. =========================================================
Tabdemo=: 0 : 0
pc tabdemo closeok escclose;
cc prefs tab closable movable;

tabnew View;
minwh 450 350;
cc gs isigraph flush;
bin s1;

tabnew Editor;
cc gross radiobutton;
cc paid checkbox;
bin z s1 z;

tabend;
)

NB. =========================================================
tabdemo_run=: 3 : 0
require 'gl2'
coinsert 'jgl2'
wd Tabdemo
wd 'set prefs active 0'
wd 'set prefs tooltip 0 "toolip view"'
wd 'set prefs tooltip 1 "toolip editor"'
wd 'set prefs icon 0 qstyle::sp_fileicon'
wd 'set prefs icon 1 qstyle::sp_diropenicon'
wd 'pmove 400 10 400 200'
wd 'pshow'
)

NB. =========================================================
demo_gs_paint=: 3 : 0
'w h'=: glqwh''
NB. draw grid
glfill 255 255 255 255
glrgb 128 128 18
glpen 0 1
for_i. 50* i.>.h%50 do.
  gllines 0,i,w,i
end.
for_i. 50* i.>.w%50 do.
  gllines i,0,i,h
end.
)

NB. =========================================================
tabdemo_prefs_tabclose=: 3 : 0
wd 'set prefs tabclose ',prefs_select
)

NB. =========================================================
tabdemo_close=: 3 : 0
wd 'pclose'
showevents_jqtide_ 0
)

showevents_jqtide_ 2
tabdemo_run''

当我运行脚本时，我希望看到一个网格图形显示在＆＃34; View＆＃34;标签

然而，遗憾的是，我在“视图”标签上看到了一个空白屏幕。有没有什么我做错了，或者根本没有办法在标签中绘制一个有形图？

我的机智在努力完成这项工作。任何帮助，将不胜感激！谢谢！

Answer 1

pc tabdemo closeok escclose;创建父对象，cc gs isagraph flush;创建该父对象的子对象并运行绘制以填充选项卡。不幸的是，您只创建了动词demo_gs_paint，而这不是您要绘制的对象的名称。

指定对象的表单是parent_child_verb，父表单是tabdemo，所以正确的答案是创建动词tabdemo_gs_paint，并且它将被适当地调用。回复上述问题的评论验证了这一点。

使用J，有没有办法在标签中绘制一个isigraph？

1 个答案: