剪贴板数据自动生成文件

感谢分享，几点意见供参考：

1、关于标准库函数的使用

最好是使用 winform.msgbox 而不是 win.msgbox;
winform.msgbox 会设置owner窗体。

process.getPath(process.getId())
实际上等价于 process.getPath()

而 process.getPath()
实际上等价于 io._exepath

2、关于获取启动参数

_CMDLINE 是解析前的纯文本，
你可以用 _ARGV[1] 取到第一个去掉分号的启动参数，这个更准确。

3、关于原始字符串

winform.edit.text = /*
可以这样表示原始字符串
换行自动被解释为'\r\n'
*/

4、其他

var fileName;// 全路径文件名
var dirName;// 当前路径,由命令行传入
这些变量声明最好放在实际使用他的代码前面，以增进代码的可读性。

win.clip.OpenClipboard(0);在代码中可尽可能靠尽win.clip.CloseClipboard();
多处调用win.clip.CloseClipboard();可以修改思路合并为一个win.clip.CloseClipboard();
一段代码一个入口、一个出口，相关的代码尽可能码到一起（聚合性）。

循环测试可用文件名因为在多处重用，可以写一个函数，例如 getPath

以下是改进后的代码（ 未仔细测试，仅供参考 ）。

  源代码 [ aardio ]

01	if( _ARGV ? _ARGV[1] ) {

02

03	import gdip;

04	import win.clip;

05	import fsys;

06

07

// 取文件名

08	var getPath = function( name ){

09

var path;

10	name = string.replace(name,"\.\w+$","%d\0");

11	for(i=1;0xFFFF;1){

12	path = fsys.joinpath(_ARGV[1],string.format(name,i));

13	if( ! io.exist(path) ) return path;

14

}

15

}

16

17

// 取剪贴板文字

18	win.clip.OpenClipboard(0);

19	var hData = win.clip.GetClipboardData(0x1/*_CF_TEXT*/)

20	if( hData ){

21	string.save(getPath("剪贴板文本 .txt"), raw.tostring(hData))

22

}

23

else {

24	hData = win.clip.GetClipboardData(0x2/*_CF_BITMAP*/)

25	if( hData ){

26	var bitmap = gdip.bitmap(hData, 0);

27	bitmap.save(getPath("剪贴板文本 .txt"));

28

}

29

else {

30	win.msgbox("当前剪贴板中没有图片或文本供粘贴！" )

31

}

32

}

33	win.clip.CloseClipboard();

34	return; //不显示设置界面

35

}

36

37	import win.ui;

38

/*DSG{{*/

39	var winform = ..win.form(text="剪贴板文字或图片生成文件";right=449;bottom=292;border="dialog frame";max=false)

40	winform.add(

41	button={cls="button";text="添加右键菜单";left=16;top=18;right=153;bottom=64;z=1};

42	button2={cls="button";text="删除右键菜单";left=16;top=76;right=153;bottom=122;z=2};

43	edit={cls="edit";left=162;top=17;right=434;bottom=226;autohscroll=false;bgcolor=12639424;border=1;edge=1;multiline=1;z=3}

44

)

45

/*}}*/

46

47	import win.reg;

48	winform.button2.oncommand = function(id,event){

49

50	var reg = win.reg("HKEY_CLASSES_ROOT\Directory\Background\shell\剪贴板to文件")

51	var reg2 = win.reg("HKEY_CLASSES_ROOT\Directory\shell\剪贴板to文件")

52	if(reg.delKeyTree("") and reg2.delKeyTree("")){

53	winform.msgbox("右键菜单删除成功！")

54

}

55

else {

56	winform.msgbox("右键菜单删除失败！")

57

}

58

59	reg.close()

60	reg2.close()

61

}

62

63	winform.button.oncommand = function(id,event){

64	//这个表项可以在资源管理器中显示,但命令行必须是 "%v"

65	var reg = win.reg("HKEY_CLASSES_ROOT\Directory\Background\shell\剪贴板to文件\command")

66	var reg2 = win.reg("HKEY_CLASSES_ROOT\Directory\shell\剪贴板to文件\command")

67	if(reg.setSzValue("",'"' + io._exepath + '"' + ' "%v"') and

68	reg2.setSzValue("",'"' + io._exepath + '"' + ' "%1"')){

69	winform.msgbox("右键菜单添加成功！")

70

}

71

else {

72	winform.msgbox("右键菜单添加失败！")

73

}

74	reg.close()

75

}

76

77	winform.edit.text = /*

78	添加右键菜单后,会在资源管理器右键菜单中出现＂剪贴板toXX＂,复制了文字或图片点击右键中的

79	＂剪贴板toXX＂就可在当前目录产生一个对应内容的文件。

80

81

注意 :

82	该程序保存位置变更后需要重新 生成右键菜单 ,之前添加会自动删除掉。

83

*/

84

85	winform.show()

86	win.loopMessage();