REVO2700 A Untitled 2 P won preOpenStack
set the unicodeTitle of this stack to uniencode(the cJpTitle of this stack, utf8)
end preOpenStack
Kk} cJpTitle !日本語でデータグリッド U ,Japanese U Lucida Grande U Lucida Grande,Unicode U Osaka,Japanese W Lucida Grande W Osaka,Japanese W Geneva U Osaka,Japanese cREVGeneral scripteditorvscroll 0breakpointconditions scripteditorselection 118 breakpoints breakpointstates stackfileversion 2.7 @ k} Custom Column Behavior Ep \on fillinData pData
set the unicodeText of me to uniencode(pdata,"utf8")
end fillinData
. 4 cREVGeneral scripteditorvscroll 0 revUniqueID
1238900653285scripteditorselection 90 Button ex q-- set the dgProp["default column behavior"] of group "DataGrid" to the long id of button "Custom Column Behavior" of this stack
on mouseUp
answer file "Select Japanese UTF8 Text"
if it <> empty then
get url ("binfile:" & it)
set the textfont of grp "datagrid" to "Osaka,Japanese"
set the dgtext of grp "DataGrid" to it
end if
end mouseUp
, 2 eg,0000000 cREVGeneral scripteditorvscroll 0 revUniqueID
1238900653286scripteditorselection 345 DataGrid h( @@@@@@ . :f E ; data _1 Col 2 歌人 Col 3 ore@kakinomoto.org Col 1 柿本人麻呂 \2 Col 2 歌人 Col 3 teika@fujiwara.com Col 1 藤原定家 \3 Col 2 歌人 Col 3 mocchan@ootomo.org Col 1 大伴家持 [4 Col 2 歌人 Col 3 izumi@shikibu.com Col 1 和泉式部 [5 Col 2 歌人 "Col 3 murasaki@shikibu.com Col 1 紫式部 )column properties Col 2
label wmi sort type text min width @D max width @@ width @M resizable true sort direction ascending $sort is case sensitive false visible true alignment left Col 3
label 000 sort type text min width @D max width @@ width @e resizable true sort direction ascending $sort is case sensitive false visible true alignment left Col 1
label
TMR sort type text min width @D max width @@ width @T resizable true sort direction ascending $sort is case sensitive false visible true alignment left revDataGridLibrary cGlx2TimeStamp checksum ُ B~ dgCache sequencing 1,2,3,4,5 dgProps "scrollbar corner offset 0scrollbar width auto auto hilite true
corner color 232,232,232default column behavior 4button id 1003 of card id 1002 of stack "Untitled 2"show vscrollbar trueshow hscrollbar truecolumn margins dim on focusOut true
row template Jgroup id 1006 of card id 1005 of stack "Data Grid Templates 1238900701061" data can be represented as text true!scroll when hscrollbar is hidden falseheader background color 219,219,219
188,188,188allow column resizing truecolumn widths header margins
control type Data Gridcolumn divider color 217,217,217style tablecolumns Col 1
Col 2
Col 3fixed row height truealternate row colors true show header truebackground color multiple lines falsepersistent data trueallow editing true header background hilite color 194,207,221
125,147,148
row color row height 21!scroll when vscrollbar is hidden falsealternate row color cache controls false
hilite color cREVGeneral scripteditorvscroll 5303 revUniqueID
1238900701109scripteditorselection 9010 dgTrackDragDrop ` + s ( revDataGridLibrary 0 cGlx2TimeStamp checksum ُ B~ cREVGeneral revUniqueID
1221247573485 dgAlternatingRows d K
* gPNG
IHDR * r~1| gAMA =-f IDATc&Z } ¯ IENDB` * cGlx2TimeStamp checksum cREVGeneral revUniqueID
1233978099140 dgEventCatcher `@* / ;d cGlx2TimeStamp checksum cREVGeneral revUniqueID
1233671464256
dgBackground k@ / ;d cGlx2TimeStamp checksum ُ B~ cREVGeneral revUniqueID
1233280734223 dgAlternatingRowsMask h / Nd cGlx2TimeStamp checksum cREVGeneral revUniqueID
1234997234836 dgAlternatingRows K@ / Nd cGlx2TimeStamp checksum cREVGeneral revUniqueID
1234997184798 dgListMask i / Nd cGlx2TimeStamp checksum cREVGeneral revUniqueID
1234029519014
dgHighlights i / cGlx2TimeStamp checksum cREVGeneral revUniqueID
1235616195900 " hilite 0001 C@ / Ns # hilite 0002 C@ / cs $ hilite 0003 C@ / xs % hilite 0004 C@ / s & hilite 0005 C@ / s ' hilite 0006 C@ / s ( hilite 0007 C@ / s ) hilite 0008 C@ / s dgList i / Ns cGlx2TimeStamp checksum ُ B~ cREVGeneral revUniqueID
1219089374947 Col 1 i A / N R $ yrevDataGridLibrary
* Col 1 0001 I / N R dgHilite falsedgIndex 1 Untitled 2 gg,NTB
+ Col 1 0002 I / c R dgHilite falsedgIndex 2 Untitled 2 S[[
, Col 1 0003 I / x R dgHilite falsedgIndex 3 Untitled 2 Y'O4[c
- Col 1 0004 I / R dgHilite falsedgIndex 4 Untitled 2 Tl_
. Col 1 0005 I / R dgHilite falsedgIndex 5 Untitled 2 }+_
/ Col 1 0006 A / R dgHilite falsedgIndex Untitled 2
0 Col 1 0007 A / R dgHilite falsedgIndex Untitled 2
1 Col 1 0008 A / R dgHilite falsedgIndex Untitled 2
Col 2 i A N ; $ yrevDataGridLibrary
2 Col 2 0001 I N ; dgHilite falsedgIndex 1 Untitled 2 kLN
3 Col 2 0002 I c ; dgHilite falsedgIndex 2 Untitled 2 kLN
4 Col 2 0003 I x ; dgHilite falsedgIndex 3 Untitled 2 kLN
5 Col 2 0004 I ; dgHilite falsedgIndex 4 Untitled 2 kLN
6 Col 2 0005 I ; dgHilite falsedgIndex 5 Untitled 2 kLN
7 Col 2 0006 A ; dgHilite falsedgIndex Untitled 2
8 Col 2 0007 A ; dgHilite falsedgIndex Untitled 2
9 Col 2 0008 A ; dgHilite falsedgIndex Untitled 2
Col 3 i A N $ yrevDataGridLibrary
: Col 3 0001 I N dgHilite falsedgIndex 1 Untitled 2 % o r e @ k a k i n o m o t o . o r g
$
; Col 3 0002 I c dgHilite falsedgIndex 2 Untitled 2 % t e i k a @ f u j i w a r a . c o m
$
< Col 3 0003 I x dgHilite falsedgIndex 3 Untitled 2 % m o c c h a n @ o o t o m o . o r g
$
= Col 3 0004 I dgHilite falsedgIndex 4 Untitled 2 # i z u m i @ s h i k i b u . c o m
"
> Col 3 0005 I dgHilite falsedgIndex 5 Untitled 2 ) m u r a s a k i @ s h i k i b u . c o m
(
? Col 3 0006 A dgHilite falsedgIndex Untitled 2
@ Col 3 0007 A dgHilite falsedgIndex Untitled 2
A Col 3 0008 A dgHilite falsedgIndex Untitled 2
dgDividers i N cGlx2TimeStamp checksum cREVGeneral revUniqueID
1234840826815 [ N [ N ! [ c N dgDropIndicator q *1 $ hrevDataGridLibrary cGlx2TimeStamp checksum ُ B~ cREVGeneral revUniqueID
1235498625974 dgOval [D * h cGlx2TimeStamp checksum cREVGeneral revUniqueID
1222830767146 dgLine [ .* 00 cGlx2TimeStamp checksum cREVGeneral revUniqueID
1222830767147 dgHeaderComponents i / ;d cGlx2TimeStamp checksum cREVGeneral revUniqueID
1234030976122
dgHeaderMask h / ;d cGlx2TimeStamp checksum ُ B~ cREVGeneral revUniqueID
1234841619761
dgBackground K@ @@@@@@ / ;s ! 1 / ; / N P ; cGlx2TimeStamp checksum cREVGeneral revUniqueID
1234839325891 dgHeader i / ;5 $ *revDataGridLibrary cGlx2TimeStamp checksum cREVGeneral revUniqueID
1234841676865
Col 1 i A / ; R $ revDataGridLibrary Background C@ / ; R ! 0 / ; / Nw ; }
HeaderLabel ( @@ / ; R T
RM
LeftHilite K@ / ; RightHilite K@ ;
SortArrow CB dddddd t @ t @ | @ x G t @ Col 2 i A ; ; $ revDataGridLibrary Background C@ ; ; ! 0 ; Nm ; }
HeaderLabel ( @@ ; ; wim
LeftHilite K@ ; RightHilite K@ ;
SortArrow CB dddddd @ @ @ G @ Col 3 i A ; $ revDataGridLibrary Background C@ ; ! 0 ; N\ ; }
HeaderLabel ( @@ ; 000
LeftHilite K@ ; RightHilite K@ c ;
SortArrow CB dddddd W @ W @_ @[ GW @ dgHeaderBottomBorder K @@@@@@ / Ms cGlx2TimeStamp checksum cREVGeneral revUniqueID
1234839342224 dgHorizontalComponents i / d cGlx2TimeStamp checksum cREVGeneral revUniqueID
1235549794665
dgHScrollbar ia / U $ zrevDataGridLibrary ) 341 cGlx2TimeStamp checksum ُ B~ cREVGeneral revUniqueID
1234031453129 dgCornerPiece K@ @@@@@@ cGlx2TimeStamp checksum cREVGeneral revUniqueID
1234032561990 dgScrollbar i` N $ frevDataGridLibrary $R۬ 148 cGlx2TimeStamp checksum ُ B~ cREVGeneral revUniqueID
1238900701169scripteditorvscroll 0scripteditorselection 0
Label Field * j
cREVTable currentview rRevolution 3.5 以上が必要です
cREVGeneral revUniqueID
1238901145218 Revolution 3.5 NN
0L_ʼn0g0Y
Label Field & z
cREVTable currentview set the dgProp["default column behavior"] of group "DataGrid" to \
the long id of button "Custom Column Behavior" of this stack
と、メッセージボックスから打ち込んで、ボタン「Custom Column Behavior」
にあるスクリプトを group "DataGrid" の"default column behavior" と
入れ替える。
cREVGeneral revUniqueID
1238901145219 Cset the dgProp["default column behavior"] of group "DataGrid" to \
@ B =the long id of button "Custom Column Behavior" of this stack
@ < G0h00000000000K0bS0a00g00000 Custom Column Behavior0
@ .
@ .
@ D C0k0B0000000 group "DataGrid" 0n"default column behavior" 0h
@
@
@ $
@ &
@ @
Qe0f0H00
@
Label Field & \
cREVTable currentview "コラムヘッダーは、インスペクターのColumns にある「Column label」に
直接日本語を打ち込めます。セットした後、インスペクターのColumnsは
文字化けします。今の所、日本語フォントをセットすると、英数字は使えません。
cREVGeneral revUniqueID
1238901145220scripteditorvscroll 0scripteditorselection 0 C00000000o000000000nColumns 0k0B00 Column label0
0k
@ "
@ "
@ *
@ 2
@ > Bvceg,0bS0a00~0Y00000W0__000000000nColumns0o
@ 8
@ 8
@ ? Ke[WS0Q0W0~0Y0N0nb@0eg,000000000Y00h0ep[W0oO0H0~0[00
@ J "Data Grid Templates 1238900701061 @ KX LEditing template for group "DataGrid" of card id 1002 of stack "Untitled 2" U Arial @ X @ X _DataGridTemplateInstructions_ i > R cGlx2TimeStamp checksum cREVGeneral revUniqueID
1236872508693
_DataGridTemplateInstructions_ 444444 B J cGlx2TimeStamp checksum
cREVTable currentview You can edit the "Row Template" group on this card to customize the look and feel of your data grid form or table. To begin, select the "Row Template" group and choose Object > Edit Group menu item.
cREVGeneral revUniqueID
1236872189019 You can edit the "Row Template" group on this card to customize the look and feel of your data grid form or table. To begin, select the "Row Template" group and choose Object > Edit Group menu item.
Row Template i 3 ) Data Grid Templates 1238900701061 cGlx2TimeStamp checksum cREVGeneral revUniqueID
1236088553682 Background K@ cGlx2TimeStamp checksum cREVGeneral revUniqueID
1236188559392
Label I
cGlx2TimeStamp checksum cREVGeneral revUniqueID
1236188559393 Behavior Script Ep G-- This script defines the behavior of your data grid's custom template. This behavior
-- only applies to 'forms' and not 'tables'.
on FillInData pDataArray
-- This message is sent when the Data Grid needs to populate
-- this template with the data from a record. pDataArray is an
-- an array containing the records data.
-- You do not need to resize any of your template's controls in
-- this message. All resizing should be handled in resizeControl.
-- Example:
set the text of field "Label" of me to pDataArray["label 1"]
end FillInData
on LayoutControl
local theFieldRect,theMasterRect
-- This message is sent when you should layout your template's controls.
-- This is where you resize the 'Background' graphic, resize fields and
-- position objects.
-- The first thing you should do is capture 'the rect of me'.
-- For fixed height data grid forms you can use items 1 through 4 of the rect as
-- boundaries for laying out your controls.
-- For variable height data grid forms you can use items 1 through 3 of the rect as
-- boundaries.
put the rect of me into theMasterRect
-- Example:
put the rect of field "Label" of me into theFieldRect
put item 3 of theMasterRect - 5 into item 3 of theFieldRect
set the rect of field "Label" of me to theFieldRect
set the rect of graphic "Background" of me to theMasterRect
end LayoutControl
setprop dgHilite pBoolean
-- This custom property is set when the highlight of your custom template has
-- changed. By default the "Background" graphic will be highlighted for you.
-- You only add script here if you want to further customize the highlight.
-- Example:
if pBoolean then
set the foregroundcolor of me to the dgProp["hilited text color"] of the dgControl of me
else
set the foregroundcolor of me to empty
end if
end dgHilite
getprop dgDataControl
-- Required by library so that it can locate your control.
return the long id of me
end dgDataControl
on mouseDoubleUp pMouseBtnNum
local theKey
-- Example of how to edit the contents of a field.
-- By passing the index of the record associated with copy of this template being displayed and
-- a key (array key) the data grid will automatically save the changes the user
-- makes and refresh the UI by calling FillInData and resizeControl.
if pMouseBtnNum is 1 then
if the dgProps["allow editing"] of the dgControl of me then
switch the short name of the target
case "Label"
put "Label 1" into theKey
EditFieldText the long id of the target, the dgIndex of me, theKey
break
end switch
end if
end if
pass mouseDoubleUp
end mouseDoubleUp
R 6