趣味のためのMacに関するサイト > AppleScript > ソースコード > Pタグのみの行(パラグラフを削除する)
ソースコード

Pタグのみの行(パラグラフを削除する)

余分な行を削除するスクリプトですが、複数あるとダメですね。

  1. –<P></P>のみの行を削除する 
  2. set paraNum to 0
  3. try
  4.     tell application Jedit X
  5.         activate
  6.         tell front document
  7.             repeat with paraNum from 1 to (count paragraph)
  8.                 –delay 1
  9.                 paraNum = paraNum + 1
  10.                 if paragraph paraNum contains <p></p> then
  11.                     delete paragraph paraNum
  12.                 end if
  13.             end repeat
  14.         end tell
  15.     end tell
  16.     display dialog 正解です
  17. on error
  18.     –エラーになるのなら、エラーがでたら処理の終了と考えてやってみる。 
  19.     tell application AppleScript Editor
  20.         activate
  21.         display dialog 処理が終了しました
  22.     end tell
  23. end try

ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー

ページトップに戻る↑                           ページ一番下へ↓

Mac

About 1q3

ツールとしてのMacについてのメリットデメリットなどの事について書いています。

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

*

Optionally add an image (JPEG only)

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください