Jw_cad 相談室−その2 New

 Jw_cad についての相談の場としてお使いください
情報の交換には Jw_cad 情報交換室 をご利用ください
なお、情報交換室と相談室の両方に同じ内容を投稿するのはご遠慮ください

2009年9月以前の発言過去ログのページからご覧ください。

それ以降の過去ログは消失しています。
申し訳ありませんが、復活の予定はありません。


  新規投稿 ┃ツリー表示 ┃スレッド表示 ┃一覧表示 ┃トピック表示 ┃番号順表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
244 / 1493     ←次へ | 前へ→

Re:文字の小数点を丸めたい
 いっち  - 17/6/2(金) 17:50 -
▼R.Nさん:
R.Nさんこんばんは。

ご質問の内容がまとまって、アクセスしてみたら、あれ?
それでもご自身で作られたものとの、比較ぐらいには下記も使えるかもしれませんね。
まぁ、参考位に見てやってください。

尚、説明用のファイルは、別ファイルにしました。

----------------------------------

文字の小数点を丸める説明.txt
この下から↓

説明
この外部変形は、任意サイズの文字の小数点を丸めます。
丸めた結果、文字色も含めて通常の文字種と同じになった場合は、
その任意サイズの文字は、通常の文字種になります。


メニュー形式版文字の小数点を丸める.bat
この下から↓

@if(0==1) // 文字の小数点を丸める
@echo off
REM #jww
REM #cd
REM #hc(左)全グループ、(右)書込グループ
REM #hm項目|全グループ|書込グループ|BAT表示|外変説明|
REM #:1
REM #h3
REM #hc文字を選択してください
REM #g1
REM #zz
REM #bz
REM #e
REM #:2
REM #h3
REM #hc文字を選択してください
REM #g0
REM #zz
REM #bz
REM #e
REM #:3
REM #:4
REM #e
GOTO EXE-%1
:EXE-1
:EXE-2
cscript //nologo //e:jscript %0
goto:eof
:EXE-3
rem more コマンドは「スペースキー」で次のページを表示してください
more %0
pause
del jwc_temp.txt
goto:eof
:EXE-4
type 文字の小数点を丸める説明.txt | more
pause
del jwc_temp.txt
goto:eof
@end
function myround(cn) {
var temp = cn.split(/\s+/);
for (var i = 1; i < temp.length - 1; i++) {
temp[i] = Math.round(parseFloat(temp[i]) * 10) / 10;
}
return temp.join(" ");
}
blnflg = false;
with (new ActiveXObject("Scripting.FileSystemObject")) {
g = CreateTextFile("myfiles");
f = OpenTextFile("jwc_temp.txt");
while (!f.AtEndOfLine) {
line = f.ReadLine();
if (blnflg) {
if (/^cn0/ .test(line)) {
myss = (myround(line));
for (var j = 0; j < dic.Count; j++) {
if (strItems[j] == myss) {
myss = strKeys[j];
break;
}
}
g.WriteLine(myss);
} else {
g.WriteLine(line);
}
} else {
if (/^hq/ .test(line)) {
g.WriteLine("hd");
} else if (/^hcw/i.test(line)) {
hcw = line.split(/\s+/).slice(1, 11);
g.WriteLine(line);
} else if (/^hch/i.test(line)) {
hch = line.split(/\s+/).slice(1, 11);
g.WriteLine(line);
} else if (/^hcd/i.test(line)) {
hcd = line.split(/\s+/).slice(1, 11);
g.WriteLine(line);
} else if (/^hcc/i.test(line)) {
hcc = line.split(/\s+/).slice(1, 11);
g.WriteLine(line);
dic = new ActiveXObject("Scripting.Dictionary");
for (i = 0; i < hcw.length; i++) {
dic("cn" + (i + 1)) =
"cn0 " + hcw[i] + " " + hch[i] + " " + hcd[i] + " " + hcc[i];
}
strVBKeys = new VBArray(dic.Keys());
strVBItems = new VBArray(dic.Items());
strKeys = strVBKeys.toArray();
strItems = strVBItems.toArray();
blnflg = true;
} else {
g.WriteLine(line);
}
}
}
f.Close();
g.Close();
CopyFile("myfiles", "jwc_temp.txt")
DeleteFile("myfiles")
}


引用なし

パスワード


<Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/58.0.3029.110 Safari/537.36@KD113151236026.ppp-bb.dion.ne.jp>
・ツリー全体表示

文字の小数点を丸めたい Ibuki 17/5/31(水) 10:01
Re:文字の小数点を丸めたい 柳 絮 17/5/31(水) 10:32
わかりづらいかもですので修正します 柳 絮 17/6/1(木) 8:22
Re:わかりづらいかもですので修正します Ibuki 17/6/1(木) 13:27
あは、そうでしたか! 柳 絮 17/6/1(木) 15:30
Re:文字の小数点を丸めたい R.N 17/5/31(水) 21:22
Re:文字の小数点を丸めたい Ibuki 17/6/1(木) 13:39
Re:文字の小数点を丸めたい R.N 17/6/1(木) 15:49
Re:文字の小数点を丸めたい 柳 絮 17/6/1(木) 19:24
Re:文字の小数点を丸めたい Ibuki 17/6/3(土) 20:23
Re:文字の小数点を丸めたい Ibuki 17/6/3(土) 20:15
Re:文字の小数点を丸めたい いっち 17/6/1(木) 20:21
Re:文字の小数点を丸めたい R.N 17/6/1(木) 21:38
Re:文字の小数点を丸めたい いっち 17/6/1(木) 22:54
Re:文字の小数点を丸めたい いっち 17/6/2(金) 0:20
Re:文字の小数点を丸めたい 柳 絮 17/6/2(金) 7:30
もうひとつの外部変形 いっち 17/6/2(金) 9:28
Re:もうひとつの外部変形 マチャプチャレ 17/6/3(土) 14:11
Re:もうひとつの外部変形 いっち 17/6/3(土) 17:03
Re:文字の小数点を丸めたい いっち 17/6/2(金) 17:50
Re:文字の小数点を丸めたい R.N 17/6/2(金) 19:21
Re:文字の小数点を丸めたい Ibuki 17/6/3(土) 20:39
Re:文字の小数点を丸めたい O.M 17/6/11(日) 6:30

244 / 1493     ←次へ | 前へ→
  新規投稿 ┃ツリー表示 ┃スレッド表示 ┃一覧表示 ┃トピック表示 ┃番号順表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
 411399
ページ:  ┃  記事番号:  

C-BOARD Moyuku v1.03b3
Jw_cad Copyright (C)1997-2016 Jiro Shimizu & Yoshifumi Tanaka