« [QR]TSVテキストリストを元にQRコードを生成する(白黒版) | トップページ | [ライセンス] Adobefontライセンスについて »

[NSPasteboard]ペーストボードからテキストの取り出し(修正)


AppleScript サンプルコード

【スクリプトエディタで開く】 |

AppleScript サンプルソース(参考)
行番号ソース
001#! /usr/bin/env osascript
002----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
003#
004#クリップボードに入っているテキストを取り出す
005#
006#
007#com.cocolog-nifty.quicktimer.icefloe
008----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
009use AppleScript version "2.8"
010use framework "Foundation"
011use framework "AppKit"
012use scripting additions
013
014property refMe : a reference to current application
015
016########################
017## クリップボードの中身取り出し
018#初期化
019set appPasteboard to refMe's NSPasteboard's generalPasteboard()
020#格納されているタイプをリストにして
021set ocidPastBoardTypeArray to appPasteboard's types()
022#テキストがあれば
023set boolContain to ocidPastBoardTypeArray's containsObject:(refMe's NSPasteboardTypeString)
024if (boolContain as boolean) is true then
025  #値を格納する
026  set ocidReadStringData to (appPasteboard's dataForType:(refMe's NSPasteboardTypeString))
027  set ocidReadString to refMe's NSString's alloc()'s initWithData:(ocidReadStringData) encoding:(refMe's NSUTF8StringEncoding)
028else
029    log "テキストなし"
030    return "クリップボードに\nテキストは\nありませんでした"
031    # set strSetSting to ("クリップボードに\nテキストは\nありませんでした") as text
032    # set ocidReadString to refMe's NSMutableString's alloc()'s initWithString:(strSetSting)
033end if
034
035
036
AppleScriptで生成しました

AppleScript サンプルコード

【スクリプトエディタで開く】 |

AppleScript サンプルソース(参考)
行番号ソース
001#! /usr/bin/env osascript
002----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
003#
004#クリップボードに入っているテキストを取り出す
005#
006#
007#com.cocolog-nifty.quicktimer.icefloe
008----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
009use AppleScript version "2.8"
010use framework "Foundation"
011use framework "AppKit"
012use scripting additions
013
014property refMe : a reference to current application
015
016########################
017## クリップボードの中身取り出し
018#初期化
019set appPasteboard to refMe's NSPasteboard's generalPasteboard()
020#格納されているタイプをリストにして
021set ocidPastBoardTypeArray to appPasteboard's types()
022#テキストがあれば
023set boolContain to ocidPastBoardTypeArray's containsObject:(refMe's NSPasteboardTypeString)
024if (boolContain as boolean) is true then
025  #値を格納する
026    set ocidTypeClassArray to refMe's NSMutableArray's alloc()'s initWithCapacity:(0)
027    ocidTypeClassArray's addObject:(refMe's NSString)
028    set ocidReadStringArray to appPasteboard's readObjectsForClasses:(ocidTypeClassArray) options:(missing value)
029    set ocidReadString to ocidReadStringArray's firstObject()
030else
031    log "テキストなし"
032    return "クリップボードに\nテキストは\nありませんでした"
033    # set strSetSting to ("クリップボードに\nテキストは\nありませんでした") as text
034    # set ocidReadString to refMe's NSMutableString's alloc()'s initWithString:(strSetSting)
035end if
036
037
038
AppleScriptで生成しました

|

« [QR]TSVテキストリストを元にQRコードを生成する(白黒版) | トップページ | [ライセンス] Adobefontライセンスについて »

NSPasteboard」カテゴリの記事