[添付ファイル一覧]
[全ページの添付ファイル一覧]
- ChangeFontSize.js
- 格納ファイル名:attach/4D6163726F2FC5EAB9C62F323039_4368616E6765466F6E7453697A652E6A73
- ページ:Macro/投稿/209
- 格納ファイル名:attach/4D6163726F2FC5EAB9C62F323039_4368616E6765466F6E7453697A652E6A73
- MD5ハッシュ値:28d3abab0f50d1c45a540645dc8e81f7
- サイズ:3.3KB (3390 bytes)
- Content-type:application/octet-stream
- 登録日時:2012/08/06 04:25:06
- アクセス数:396
- MD5ハッシュ値:28d3abab0f50d1c45a540645dc8e81f7
0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
| |
var sDefaultFontSize = "10";
Main();
function Main()
{
var WshShell = new ActiveXObject("WScript.Shell");
var sSELFCALLID = "/CallByMyself"; var sMacroPath;
var sFontSize;
var n;
if( typeof Editor != "undefined" ){
sMacroPath = Editor.ExpandParameter("$M");
if( sMacroPath == "" ) return;
sFontSize = sDefaultFontSize;
if( sMacroPath.match( /.*FontSize=([0-9]+)[^\\]*$/i ) != null ){
n = parseInt( RegExp.$1 );
if( (n >= 8) && (n <= 72) ){
sFontSize = RegExp.$1;
}
}
WshShell.Run( "mshta.exe \"about:<hta:application windowstate=minimize />"
+ "<script>clipboardData.setData('text', '" + sFontSize + "'); close();</script>\""
, 0, true );
WshShell.Run( 'wscript.exe "' + sMacroPath + '" ' + sSELFCALLID );
Editor.SelectFont();
}else{
var WshArgs = WScript.Arguments;
if( (typeof WshArgs == "undefined")||(WshArgs.length == 0)||(WshArgs(0) != sSELFCALLID) ){
WScript.Echo( "このスクリプトはサクラエディタのマクロ用です。" );
return;
}
WScript.Sleep( 20 );
WshShell.SendKeys( "%s" ); WshShell.SendKeys( "^v" ); WshShell.SendKeys( "{ENTER}" ); }
}
|