//%attributes = {}
#DECLARE($zoomrate : Real)

$picturesize:=600

//ピクチャーのサイズを変換する
C_PICTURE:C286($picture)
C_PICTURE:C286($thumbnail)
$picture:=Form:C1466.selectedPicture.Picture
TRANSFORM PICTURE:C988($picture; Reset:K61:1)
TRANSFORM PICTURE:C988($picture; Scale:K61:2; $zoomrate; $zoomrate)
Form:C1466.selectedPicture.Picture:=$picture

OBJECT SET SCROLL POSITION:C906(*; "Input"; 0; 0)

