このスクリプトの「コンテキストにバインドされていない」というエラーが発生しているのは何ですか?
質問
次のR3-GUIスクリプトを持っています:
Rebol [
file: %context.reb
]
either exists? %r3-gui.r3 [do %r3-gui.r3][load-gui]
view [
title "First Window"
hgroup [
lab: label "fld 1 "
fld1: field "Field Data 1"
]
button "Display fld 1" on-action [if error? try [probe get-face fld1][alert "Can't read fld1"]]
button "Display fld 2" on-action [if error? try [probe get-face fld2][alert "Can't read fld2"]]
button "Open 2nd Window" on-action [
view [
title "Second Window"
hgroup [
label "fld 2" fld2: field "field 2 data"
]
button "Display fld1" on-action [if error? err: try [probe get-face fld1][probe err alert "Can't read fld1"]]
button "Display fld2" on-action [if error? err: try [probe get-face fld2][probe err alert "Can't read fld2" ]]
]
]
]
.
2番目のウィンドウの「表示FLD2」ボタンをクリックしてFLD2の内容にアクセスすると、** Script error: fld2 word is not bound to a context
エラーが発生しています。この原因は何ですか?そして、2番目のウィンドウ内のfld2
の単語にどのようにアクセスしますか?
解決 2
parse-layout
関数によって作成されている匿名関数がクロージャーであるべきであるため、問題は生じています。 https://gist.github.com/earl/a009454787D9FE4CFACA これを修正する。
他のヒント
FLD2は匿名関数に対してローカルで、ユーザーコンテキスト
にバインドされていないため>> help win-face/facets/tab-face/actors
WIN-FACE/FACETS/TAB-FACE/ACTORS is a block of value: [on-action make function! [[face arg
/local fld2 err
][
view layout [
title "Second Window"
hgroup [
label "fld 2" fld2: field "field 2 data"
]
button "Display fld 1" on-action [if error? try [probe get-face fld1] [alert "Can't read fld1"]]
button "Display fld2" on-action [if error? err: try [probe get-face fld2] [probe err alert "Can't read fld2"]]
]
]]]
>>
.
このようにしても
l2: layout [
title "Second Window"
hgroup [
label "fld 2" fld2: field "field 2 data"
]
button "Display fld1" on-action [if error? err: try [probe get-face fld1][probe err alert "Can't read fld1"]]
button "Display fld2" on-action [if error? err: try [probe get-face fld2][probe err alert "Can't read fld2" ]]
]
view l1: layout [
title "First Window"
hgroup [
lab: label "fld 1 "
fld1: field "Field Data 1"
]
button "Display fld 1" on-action [if error? try [probe get-face fld1][alert "Can't read fld1"]]
button "Display fld 2" on-action [if error? try [probe get-face fld2][alert "Can't read fld2"]]
button "Open 2nd Window" on-action [
view l2
]
]
. 所属していません StackOverflow