Indexへ
(4460)//【4451】→(4456)
------------------------
【タイトル】フォルダー名と図面の文字
【記事番号】 4451 (*)
【 日時 】05/12/18 09:18
【 発言者 】おっとー

みなさんには、いつもお世話になっています。
1.フォルダー名を現場名にしていて名前を変更したい時にそのなかに入っている
図面データの名前もフォルダー名を変えれば、一括で変更できるものないですか？
（埋め込み文字でファイル名の変更で図面の中の文字が変わる方法はわかります）
2．図面を９０°回転させても寸法文字・文字の方向を一定の方向に統一できる
やり方、教えて下さい。（これも一括でできるやり方）
上記、２点についてわかる方、いましたら教えてもらえたら助かります。


Indexへ
(4451)←【4456】→(4457)
------------------------
【タイトル】Re(1):フォルダー名と図面の文字
【記事番号】 4456 (4451)
【 日時 】05/12/18 17:55
【 発言者 】joker
【 リンク 】http://www.atsmile.com/jw/



▼おっとーさん：
>1.フォルダー名を現場名にしていて名前を変更したい時にそのなかに入っている
>図面データの名前もフォルダー名を変えれば、一括で変更できるものないですか？

ファイル管理ツールなどは、Vector 等で探してみてはいかがでしょうか？
http://www.vector.co.jp/

ファイル名の一括変更は、DOSでは、何個目の文字を、どういう文字に変える、
という RENコマンドをワイルドカードを使ったりして行っていますが、
単純なファイル管理ツールでのファイル名の一括変更というのは、そういう
パターンが多いのではないかと思います。また、ファイル名の前後に○○という
文字を追加する、などというツールもあると思いますし、
ファイル名の○○という文字を、□□という文字に書き換える、というツールも
探せばあるのではないかと思います。

しかし、
フォルダ名を変更したら自動的に、その中のファイル名も変えてしまう、
というのは　なかなか無いのではないかと思います。
フォルダというのは、名前で分類しているのであって、例えば、
［あいうえお］フォルダ
　　+--- ABC.JWW
　　+--- DEF.JWW
　　+--- GHI.JWW
という名前付けはしても、
［あいうえお］フォルダ
　　+--- あいうえお-ABC.JWW
　　+--- あいうえお-DEF.JWW
　　+--- あいうえお-GHI.JWW
のような名前付けをするのだろうか？　まぁ、自由なんですけど。
ツールを作る側は、そういう事をするんであろう、それであれば、
こういうツールがあれば便利だろう、という前提で、作ると思いますので。

でもまぁ、探してみると結構あったりするのかもしれません。

>2．図面を９０°回転させても寸法文字・文字の方向を一定の方向に統一できる
>やり方、教えて下さい。（これも一括でできるやり方）

図面を９０°回転、というのは、移動コマンドで回転角を 90°にして移動しても
文字の向きが以前のまま、という意味ですか？　であれば、
範囲選択の終点指示の時に、マウス右クリックしていない、という事でしょうか？

軸角を指定して、メニュー「編集｜データ整理」→選択　をして
[文字角度整理]をクリックすれば、選択した文字は軸角の傾きになります。
寸法文字は、寸法図形になっていると効かないようです。その場合は、
寸法図形解除を行う必要があるのではないかと思います。
また、寸法線との絡みが合わない場合が出てくると思います。
その辺の絡みの外部変形プログラムが　確か　どこかで公開されたような
記憶があります。


Indexへ
(4456)←【4457】→(4459)
------------------------
【タイトル】Re(2):フォルダー名と図面の文字
【記事番号】 4457 (4456)
【 日時 】05/12/18 18:36
【 発言者 】siegel
【 リンク 】http://homepage2.nifty.com/siegel



▼おっとーさん：
>また、寸法線との絡みが合わない場合が出てくると思います。
>その辺の絡みの外部変形プログラムが　確か　どこかで公開されたような
>記憶があります。

■KITIさんの「外変forJWW 寸法回転（要GAWK）」
http://homepage2.nifty.com/kiti_ku/index.html
http://forum.nifty.com/farchi/download/cad/jw/sun_ten.htm

この外変を利用するには gawk.exe が必要です。
この外変は寸法図形を対象としています。

機能 ：範囲選択で指定された寸法値を一括して
　　　[回転]　その場で180度回転
　　　[反転]　寸法線に対して180度反転
　　　[跳越]　寸法線を跳び越えて移動します。
　　 （図面を回転した時などに利用します。）

ご参考まで（作者様　ありがとうございます。）


Indexへ
(4457)←【4459】→(4458)
------------------------
【タイトル】Re(3):フォルダー名と図面の文字
【記事番号】 4459 (4457)
【 日時 】05/12/18 21:07
【 発言者 】おっとー

▼siegelさんへ：
返答ありがとうございます。
>>また、寸法線との絡みが合わない場合が出てくると思います。
>>その辺の絡みの外部変形プログラムが　確か　どこかで公開されたような
>>記憶があります。
>■KITIさんの「外変forJWW 寸法回転（要GAWK）」
>http://homepage2.nifty.com/kiti_ku/index.html
>http://forum.nifty.com/farchi/download/cad/jw/sun_ten.htm
> この外変を利用するには gawk.exe が必要です。
> この外変は寸法図形を対象としています。
>機能 ：範囲選択で指定された寸法値を一括して
>　　　[回転]　その場で180度回転
>　　　[反転]　寸法線に対して180度反転
>　　　[跳越]　寸法線を跳び越えて移動します。
>　　 （図面を回転した時などに利用します。）
ｊｗｗの作図の時間短縮にとても有効な機能およびソフトだと思います。
ぜひ　使わせていただきたいと思います。（siegelさんと作者さんに感謝しています）


Indexへ
(4459)←【4458】→(4481)
------------------------
【タイトル】Re(2):フォルダー名と図面の文字
【記事番号】 4458 (4456)
【 日時 】05/12/18 20:59
【 発言者 】おっとー

▼jokerさん：
いつも返事を下さってありがとうございます。
vectorさんやいろんなｊｗｗの本で調べているのですがなかな見つけることが
できません。後、みじかにｊｗｗを詳しく知っている人がいません。
情報交換室のみなさんが私の先生です。下記の件、根気強く探してみたいと思います。
>ファイル管理ツールなどは、Vector 等で探してみてはいかがでしょうか？
>http://www.vector.co.jp/
>ファイル名の一括変更は、DOSでは、何個目の文字を、どういう文字に変える、
>という RENコマンドをワイルドカードを使ったりして行っていますが、
>単純なファイル管理ツールでのファイル名の一括変更というのは、そういう
>パターンが多いのではないかと思います。また、ファイル名の前後に○○という
>文字を追加する、などというツールもあると思いますし、
>ファイル名の○○という文字を、□□という文字に書き換える、というツールも
>探せばあるのではないかと思います。
>しかし、
>フォルダ名を変更したら自動的に、その中のファイル名も変えてしまう、
>というのは　なかなか無いのではないかと思います。
>フォルダというのは、名前で分類しているのであって、例えば、
>［あいうえお］フォルダ
>　　+--- ABC.JWW
>　　+--- DEF.JWW
>　　+--- GHI.JWW
>という名前付けはしても、
>［あいうえお］フォルダ
>　　+--- あいうえお-ABC.JWW
>　　+--- あいうえお-DEF.JWW
>　　+--- あいうえお-GHI.JWW
>のような名前付けをするのだろうか？　まぁ、自由なんですけど。
>ツールを作る側は、そういう事をするんであろう、それであれば、
>こういうツールがあれば便利だろう、という前提で、作ると思いますので。
>でもまぁ、探してみると結構あったりするのかもしれません。
>>2．図面を９０°回転させても寸法文字・文字の方向を一定の方向に統一できる
>>やり方、教えて下さい。（これも一括でできるやり方）
>図面を９０°回転、というのは、移動コマンドで回転角を 90°にして移動しても
>文字の向きが以前のまま、という意味ですか？　であれば、
>範囲選択の終点指示の時に、マウス右クリックしていない、という事でしょうか？
>軸角を指定して、メニュー「編集｜データ整理」→選択　をして
>[文字角度整理]をクリックすれば、選択した文字は軸角の傾きになります。
>寸法文字は、寸法図形になっていると効かないようです。その場合は、
>寸法図形解除を行う必要があるのではないかと思います。
>また、寸法線との絡みが合わない場合が出てくると思います。
>その辺の絡みの外部変形プログラムが　確か　どこかで公開されたような
>記憶があります。


Indexへ
(4458)←【4481】//(4461)
------------------------
【タイトル】Re(3):自己専用ツール
【記事番号】 4481 (4458)
【 日時 】05/12/21 19:06
【 発言者 】コジマ

▼おっとーさん：
>いつも返事を下さってありがとうございます。
>vectorさんやいろんなｊｗｗの本で調べているのですがなかな見つけることが
>できません。後、みじかにｊｗｗを詳しく知っている人がいません。


>>フォルダ名を変更したら自動的に、その中のファイル名も変えてしまう、
>>というのは　なかなか無いのではないかと思います。
>>フォルダというのは、名前で分類しているのであって、例えば、
>>［あいうえお］フォルダ
>>　　+--- ABC.JWW
>>　　+--- DEF.JWW
>>　　+--- GHI.JWW
>>という名前付けはしても、
>>［あいうえお］フォルダ
>>　　+--- あいうえお-ABC.JWW
>>　　+--- あいうえお-DEF.JWW
>>　　+--- あいうえお-GHI.JWW
>>のような名前付けをするのだろうか？　まぁ、自由なんですけど。

こんな風にファイル管理される方は、まずいませんので、
ネットで探しても無駄な気がします。

どうしても、必要なものなら自分専用のツールを作るしかないのでは？

以下の外変で、希望のことはできるかも？
（意図が分からないので100%ではないでしょうが）

この外部変形の実行には、mswin32 版 Ruby のインストールが必要です。
以下で入手できます。
http://www61.tok2.com/home2/gravelroad/tips/inst_msw.html

◎バッチファイル（ファイル名　dir_rename.bat）
以下の文をコピペ後、全角スペースを半角スペースに一括置換してください。

@REM ディレクトリ名変更
@echo off
REM #jww
REM #cd
REM #e
ruby -Ks dir_rename.rb
dir.bat


◎スクリプトファイル（ファイル名　dir_rename.rb）
以下の文をコピペ後、全角スペースを半角スペースに一括置換してください。

$old_dir=Dir.pwd

require 'vr/vruby'
require 'vr/vrcontrol'

module Frm_form1

　　　　def construct
　　　　　　　　$_form1_fonts=[
　　　　　　　　　　　　@screen.factory.newfont('ＭＳ ゴシック',-16,0,4,0,0,0,49,128)
　　　　　　　　]
　　　　　　　　self.caption = 'フォルダ名の変更'
　　　　　　　　self.move(306,222,274,233)
　　　　　　　　addControl(VRStatic,'static1',"フォルダ名（変更可）",24,120,216,24,1342177793)
　　　　　　　　@static1.setFont($_form1_fonts[0])
　　　　　　　　addControl(VRButton,'button1',"開く",16,24,104,40,1342177280)
　　　　　　　　@button1.setFont($_form1_fonts[0])
　　　　　　　　addControl(VRButton,'button2',"名称変更",152,24,96,40,1342177280)
　　　　　　　　@button2.setFont($_form1_fonts[0])
　　　　　　　　addControl(VREdit,'edit1',"",24,152,224,24,1342177408)
　　　　　　　　@edit1.setFont($_form1_fonts[0])
　　　　end

　　　　def button1_clicked
　　　　　　　　openFilenameDialog [ ["jww","*.jww"]]
　　　　　　　　$path=Dir.pwd
　　　　　　　　@edit1.text=$path.split("/")[-1]
　　　　end

　　　　def button2_clicked
　　　　　　　　new_dir=@edit1.text

　　　　　　　　open($old_dir+"\/dir.bat","w"){|f|
　　　　　　　　　　　　f.puts("REN"+"\s"+$path.gsub("\/","\\")+"\s"+new_dir)
　　　　　　　　　　　　f.puts "dir2.bat"
　　　　　　　　　　　　f.puts "pause"
　　　　　　　　}

　　　　　　　　open($old_dir+"\/dir2.bat","w"){|f|
　　　　　　　　　　　　f.puts("ruby -Ks "+$old_dir.gsub("\/","\\")+"\\file_rename.rb")
　　　　　　　　　　　　f.puts "pause"
　　　　　　　　}
　　　　　　　　puts("フォルダ名を「#{$path.split("/")[-1]}」→「#{@edit1.text}」に変更しました")
　　　　　　　　close
　　　　end
end

VRLocalScreen.start　Frm_form1


◎スクリプトファイル（ファイル名　file_rename.rb）
以下の文をコピペ後、全角スペースを半角スペースに一括置換してください。

open("dir.bat","r"){|f|
　　　　while line=f.gets
　　　　　　　　if line=~/^REN\s/
　　　　　　　　　　　　dir_a=line.split("\\")
　　　　　　　　　　　　dirs=dir_a[-1]
　　　　　　　　　　　　path=dir_a[0][4..-1]+"\/"+dir_a[1..-2].join("\/")

　　　　　　　　　　　　old_dir_name=dirs.split("\s")[0]
　　　　　　　　　　　　new_dir_name=dirs.split("\s")[1]
　　　　　　　　end
　　　　end
　　　　files=Dir.entries(path+"\/"+new_dir_name)
　　　　files.each{|f|
　　　　　　　　if f=~/\.jww$/
　　　　　　　　　　　　if f=~/#{old_dir_name}/
　　　　　　　　　　　　　　　　File.rename(path+"\/"+new_dir_name+"\/"+f,
　　　　　　　　　　　　　　　　path+"\/"+new_dir_name+"\/"+f.gsub(old_dir_name,new_dir_name))
　　　　　　　　　　　　　　　　puts "#{f}　→　#{f.gsub(old_dir_name,new_dir_name)}　に変更"

　　　　　　　　　　　　end
　　　　　　　　end
　　　　}
}
File.delete("dir.bat")