REVO2700 Untitled 3 ]on preOpenStack set the title of this stack to the cTitle of this stack end preOpenStack T _ cTitle {e[u {e[u U Lucida Grande,Japanese U Lucida Grande U Osaka,Japanese U ,Japanese U ,Japanese U Lucida Grande U Osaka,Japanese U Lucida Grande,Japanese U Geneva U Tahoma U Tahoma,Japanese cREVGeneral scriptChecksum A=L[R^eS bookmarks handlerList preOpenStackscriptSelection char 93 to 92prevHandler countUnicodeLinestempScript stackfileversion script
on preOpenStack
set the title of this stack to the cTitle of this stack
end preOpenStack
@ jpTable )k " N L < cREVGeneral revUniqueID 1143933680947 !0B0D0F 0K0M0O 0U0W0Y 0_0a0dN 0D 0 0o0kR 0{0x0h %d0Uh m\00 L0M0k l7Qe0 $ ` _ J tInput )h r2 @ cREVGeneral revUniqueID 1143933769316 0B0D0F,0K0M0O,0U0W0Y,0_0a0dN 0D,0,,0o0kR ,0{0x0h !d0Uh,m\00,L0M0k,,l7Qe0 Button ex on mouseUp get the unicodeText of fld "tInput" replace uniencode(comma) with uniencode(tab) in it set the textfont of fld "jpTable" to "Osaka,Japanese" set the unicodeText of fld "jpTable" to it end mouseUp $ 6 00000keg,0000 cREVGeneral scriptChecksum _U?(k9ȵk bookmarks revUniqueID 1143933802868handlerList mouseUpscriptSelection char 216 to 215prevHandler mouseUptempScript script )on mouseUp
get the unicodeText of fld "tInput"
replace uniencode(comma) with uniencode(tab) in it
set the textfont of fld "jpTable" to "Osaka,Japanese"
set the unicodeText of fld "jpTable" to it
end mouseUp
tReplace )h cREVGeneral revUniqueID 1143933822065 eg, tCell )h cREVGeneral revUniqueID 1143933843213 2,3 Button ex on mouseUp replaceCell jpTable, tReplace, tCell end mouseUp on replaceCell pTableField, pReplaceText, pCell put unidecode(the unicodeText of fld pTableField,japanese) into tSJISTable put item 1 of fld pCell into tColumn put item 2 of fld pCell into tRow set the itemDel to tab put unidecode(fld pReplaceText, Japanese) into item tColumn of line tRow of tSJISTable set the unicodeText of fld pTableField to uniEncode(tSJISTable,Japanese) end replaceCell &F 0 000]0Wf0H cREVGeneral scriptChecksum 1!%QM@;ך bookmarks revUniqueID 1143933855567handlerList mouseUp replaceCellscriptSelection char 470 to 469prevHandler mouseUptempScript script 7on mouseUp
replaceCell jpTable, tReplace, tCell
end mouseUp
on replaceCell pTableField, pReplaceText, pCell
put unidecode(the unicodeText of fld pTableField,japanese) into tSJISTable
put item 1 of fld pCell into tColumn
put item 2 of fld pCell into tRow
set the itemDel to tab
put unidecode(fld pReplaceText, Japanese) into item tColumn of line tRow of tSJISTable
set the unicodeText of fld pTableField to uniEncode(tSJISTable,Japanese)
end replaceCell
Label Field 3 d cREVTable currentview [差し替え文:
cREVGeneral revUniqueID 1143939093512 ]0Wf0He Label Field v cREVTable currentview {セル(コラム、ロウ)
cREVGeneral revUniqueID 1143939135407 00000000 Line K J b cREVGeneral revUniqueID 1143939469589 Label Field h cREVTable currentview by Kenji Kojima : cREVGeneral revUniqueID 1143939481010 by Kenji Kojima :