GIMP Script-Fu Shiro-Layer-To-Resize-Image

GIMP 2.8 / 2.6 用の Script-Fu ファイル です。
選択されている活性レイヤーから　その位置や大きさを基に 画像（キャンバス）サイズ位置 を変更 します。




　　　　　　　　　Download Link  >　Shiro-Layer-To-Resize-Image.scm

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　Link の無断転載を禁じます！。.

FileName : Shiro-Layer-To-Resize-Image.scm
FileDate : 2016/01/13 22:55:32     ( or * Downloaded Date * )
FileSize : 2268    (3KB)
   MD5 : 525498cc82b6b3214c1311c085fb2f40
  SHA1 : 0a5e5ebffdc37a606603f0649f3258b8762dd452

　　　　　　　　　　　　　　　
利用環境：　GIMP 2.8.16 前提のファイルです。　2.6.xx でも動作確認しています。

スクリプト名：　Shiro-Layer-To-Resize-Image.scm　 *1.
登録関数名：　script-fu-shiro-from-layer-to-resize-image　 *1.


ファイルイメージ：

;
; ---------------------------------------------- version 1.1 2015/12/25
; ---------------------------------------------- version 1.2 2015/12/26
; ---------------------------------------------- version 1.3 2016/01/12
;
(define (script-fu-shiro-from-layer-to-resize-image
  ;引数
 img
 layer1
          )

  ;処理
    (gimp-image-undo-group-start img)

   (gimp-image-resize-to-layers img)
    ;                    Before Resize, Select All Layers

    (let ((width 0) (height 0) (leftTop_x 0) (leftTop_y 0) )

        (set! layer1 (car (gimp-image-get-active-layer img)) )
        (set! width (car (gimp-drawable-width layer1)) )
        (set! height (car (gimp-drawable-height layer1)) )
        (set! leftTop_x (car (gimp-drawable-offsets layer1)) )
        (set! leftTop_y (cadr (gimp-drawable-offsets layer1)) )

        ;(gimp-rect-select img leftTop_x leftTop_y width height 0 0 0)
        ;                            Add Selection    ;Deprecated
        ;                            Use 'gimp-image-select-rectangle' instead. (pdb)

        ;(gimp-image-select-rectangle img 2 leftTop_x leftTop_y width height)
        ;                            2nd parameter Int32
        ;                                 0(Add追加)  1(Subtract減算)  2(Replace置換)  3(Intersect交差)

      (gimp-image-resize img width height (- leftTop_x) (- leftTop_y))
    )

    (gimp-image-undo-group-end img)
    (gimp-displays-flush)

)


;登録

(script-fu-register
  "script-fu-shiro-from-layer-to-resize-image"            ;func name  v1.3

;  "<Image>/Select/レイヤーから選択範囲  (Shiro版)"            ;X menu label (X v1.2)
;  "<Image>/Select/Create selection from layer (ShiroV.)"    ;X menu label(Eng) (X v1.2)
;  "レイヤーから選択範囲を作成"                            ;X description (X v1.2)
;  "Create a selection from a layer"                    ;X description(Eng) (X v1.2)

  "<Image>/Image/レイヤーから画像リサイズ  (Shiro版)"    ;menu label (v1.3)
;  "<Image>/Imager/Resize Image from layer (ShiroV.)"     ;menu label(Eng) (v1.3)
  "活性レイヤーから画像をリサイズ調整します　v1.3"       ;description (v1.3)
;  "Resize(Adjust) Image from the active layer  v1.3"     ;description(Eng) (v1.3)
  "ShiroYuki_Mot"                                                ;author
  "(c) 2015- ShiroYuki_Mot"                                ;copyright notice
  "2015/12/24"                                                    ;date created
  "*"                                                                ;image type on the script

  ;パラメータ
 SF-IMAGE    "Image"    0
 SF-DRAWABLE "Drawable" 0

)

使い方：
　　　　　　フォルダ：C:¥Users¥UserName¥.gimp2.x¥scripts　に配置します。
　　　　　　尚、既存ファイル･関数との競合が生じた場合には、何れかを、削除する必要があります。　　（名前の衝突）
　　　　　　また、　ファイルを配置する前に、　プロパティ から　インターネット取得時の ブロック 解除 を行って下さい。

　　　　　　メニューでは　画像(I) 　の中に格納されます。

　　　　　　画像がある状態で、　このスクリプトを実行すると、
　　　　　　現在選択している（アクティブな） 活性レイヤーから　位置と大きさを取得し、　これと同じ 画像（キャンバス）サイズ位置 に変更します。
　　　　　　この時、既に、選択範囲がある場合には、　新しい これ に 置換 されます。


特記事項：　改行コード LF 。


参考事項：　
　　　　　　　GoogleDrive 上では テキストファイルでなくバイナリファイルと認識され、プレビュー出来ません。



ShiroYuki_Mot の ひとりごと　掲載 URL　  http 接続です。　別ページ（タブ）で開きます。

　　　http://shiroyuki-mot-says.blogspot.com/2016/01/gimp-script-fu-6.html





[2016/01/13] スクリプト変更に伴い、投稿内容を更新