Indexへ
(32759)//【32699】→(32702)
------------------------
【タイトル】JWLファイルを外部変形で外部変形に反映させるには？
【記事番号】 32699 (*)
【 日時 】09/01/21 12:48
【 発言者 】ぼんぼん

自分用外部変形を作っています。

外部変形の完了後、外部変形からレイヤの表示状態を設定したJWLファイルを適用したいのですが、どうしたらよいのでしょうか？

今は、自作外部変形完了後、環境設定からJWLファイルを読み込んでいます。

外部変形の "lg% %d"も試しましたが、どうも動かないようです。


Indexへ
(32699)←【32702】→(32709)
------------------------
【タイトル】Re(1):JWLファイルを外部変形で外部変形に反映させるには？
【記事番号】 32702 (32699)
【 日時 】09/01/21 14:24
【 発言者 】hayabusa

▼ぼんぼんさん：
>自分用外部変形を作っています。
>
>外部変形の完了後、外部変形からレイヤの表示状態を設定したJWLファイルを適用したいのですが、どうしたらよいのでしょうか？
>
>今は、自作外部変形完了後、環境設定からJWLファイルを読み込んでいます。
>
>外部変形の "lg% %d"も試しましたが、どうも動かないようです。

こんにちは。

JWW_SMPL.BATを調べてみましたが
書き込みデータ[JW_WIN.EXE → JWC_TEMP.TXT]には
lg%x %d( %x:ﾚｲﾔｸﾞﾙｰﾌﾟ番号　%d:ﾚｲﾔｸﾞﾙｰﾌﾟ状態 )
ly%x %d( %x:レイヤ番号　　 %d:レイヤ状態 )
が有効ですが

読み込みデータ゜[JWC_TEMP.TXT → JW_WIN.EXE]には
lg%x %d( %x:ﾚｲﾔｸﾞﾙｰﾌﾟ番号　%d:ﾚｲﾔｸﾞﾙｰﾌﾟ状態 )
ly%x %d( %x:レイヤ番号　　 %d:レイヤ状態 )
の記述がないようです。

そうであれば外部変形からレイヤ状態を操作すると言う事は
できない事になるようです。(勘違いでしたらすいません)

但し、別の手法があるかもしれませんので詳しい方のレス
に期待しましょう。


Indexへ
(32702)←【32709】→(32717)
------------------------
【タイトル】Re(1):JWLファイルを外部変形で外部変形に反映させるには？
【記事番号】 32709 (32699)
【 日時 】09/01/21 20:25
【 発言者 】sugi

sugiです。みなさん、こんにちは。

ぼんぼんさん wrote:
> 外部変形の完了後、外部変形からレイヤの表示状態を設定した
> JWLファイルを適用したいのですが、どうしたらよいのでしょうか？

以前 Sendkeys を用いて jwlファイルを切り替える外部変形を
ruby で考えたことがあります。

こんな感じでどうでしょう？

=== レイヤ設定ファイル.BAT (ここから) ===
@rem レイヤ設定ファイルの切替え補助
@echo off
REM #jw
goto %1
REM #hm【レイヤ設定ファイル】 |書出し[L]|読込み[R]|ルート書出|ルート読込|
REM #hc【レイヤ設定ファイル】メニューを選択して下さい。
REM #:1
REM #:2
REM #:3
REM #:4
REM #hf
REM #e
:1
:2
:3
:4
copy jwc_temp.txt jwc_temp.bak
start ruby -Ks -x %~f0 %1
rem ruby -Ks -x %~f0 %1
REM pause
goto END

:COMENT
【書　出　し】：図面と同じフォルダにレイヤ設定ファイルを書き出す
【読　込　み】：図面と同じフォルダからレイヤ設定ファイルを読み込む
【ルート書出】：jw_win.exe のあるフォルダにレイヤ設定ファイルを書き出す
【ルート読込】：jw_win.exe のあるフォルダからレイヤ設定ファイルを読み込む

#!ruby

$stderr=open("error.log","w") #エラーメッセージ(ルートに作成)

require 'Win32API'
require 'win32ole'
require 'win32/clipboard'

op=ARGV[0].to_i
if op<=2 #カレントディレクトリ
　dir=open("jwc_temp.bak").
　　grep(/^file=(.*)/){|e| File.dirname($1)}.to_s
else #ルート
　dir=Dir.pwd.gsub("/","\\")
end

Win32::Clipboard.set_data(dir+"\\")
shell = WIN32OLE.new("WScript.Shell")
shell.AppActivate("jw_win");sleep(0.3)
if op%2==0 #読込み
　shell.Sendkeys("%sfr");sleep(0.2)
else #書出し
　shell.Sendkeys("%sfw");sleep(0.2)
end
shell.Sendkeys("%tj%n");sleep(0.2)
shell.Sendkeys("^v{ENTER}{RIGHT}");sleep(0.2)
#shell.Sendkeys("foo{ENTER}")

__END__
:END
=== レイヤ設定ファイル.BAT (ここまで) ===

--
sugi


Indexへ
(32709)←【32717】→(32734)
------------------------
【タイトル】Re(1):JWLファイルを外部変形で外部変形に反映させるには？
【記事番号】 32717 (32699)
【 日時 】09/01/22 09:17
【 発言者 】mirror

▼ぼんぼんさん：
レイヤ・グループの表示状態を思惑通りにする方法は、環境設定(jwf・jwl)以外に
タグジャンプ(表示倍率も指定可能)させる方法もあります。

環境設定・タグジャンプ、何れの手法であっても
jwwの操作を行えるようなツールがあれば、外部変形呼出からツールを起動して
レイヤ・グループの表示状態を適用する事が可能です。

でも、やはり
外部変形機能でレイヤ状態等を指定できるような仕様にして貰うのが
スマートで安心出来るのではないかとは思いますが。


Indexへ
(32717)←【32734】→(32737)
------------------------
【タイトル】Re(1):JWLファイルを外部変形で外部変形に反映させるには？
【記事番号】 32734 (32699)
【 日時 】09/01/22 21:55
【 発言者 】jkk@

▼ぼんぼんさん：

http://www7a.biglobe.ne.jp/~tamalabo/dust.htm　の
Jmac038a_071228.lzh
を最後に放り込めば、できる。かも？です。

VB6ランタイム要るとありますが、あんまり気にしないでもいいかも。。

!更新履歴.txtを飲用して補足
--------------------
・JWF（環境設定ファイル）,JWLファイルの操作用コマンドオプションを追加した。

コマンド・・・
Jmacro.exe /JWFR[ドライブ:][パス][ファイル名]・・・読込み


Indexへ
(32734)←【32737】//(32701)
------------------------
【タイトル】Re(1):JWLファイルを外部変形で外部変形に反映させるには？
【記事番号】 32737 (32699)
【 日時 】09/01/22 23:15
【 発言者 】Kazuo Miyake qqza3hq89@aioros.ocn.ne.jp

▼ぼんぼんさん：
>自分用外部変形を作っています。
>
>外部変形の完了後、外部変形からレイヤの表示状態を設定したJWLファイルを適用したいのですが、どうしたらよいのでしょうか？
>
>今は、自作外部変形完了後、環境設定からJWLファイルを読み込んでいます。
>
>外部変形の "lg% %d"も試しましたが、どうも動かないようです。

ご質問の主旨からは はずれているかもしれませんが lg%x まわりの動作には多少
バグが残っているような気がしています。

つぎの外部変形を動かして たとえば

コマンド入力 -> lg1 11

とした場合 lg1 に 画面は切り替わらないと思います。(右下は [1-0] のようになる)

:コマンドチェック
@echo off
REM #jww
@REM #h1
@REM #g1
REM #gn
REM #c&&
REM #e
type jwc_temp.txt
pause
echo %* > jwc_temp.txt
type jwc_temp.txt
pause
exit

レイヤー状態 %d は 読み込み条件には hayabusa さんがおっしゃられるように
機能説明書にはないようです。

線色 lc や 線種 lt についても DOS版では 切り替わっていたように思うのです
が JWW版では 切り替わらないと思います。

お答えにはなっていないのですが 気づいたことを申しあげました。