挚友02 发表于 2025-5-28 08:50:52

要命的事，以前怎么没发现。。。。

将一个文件的内容复制或附加到另一个文件(vl-file-copysource-file destination-file )将一个文件的内容复制或附加到另一个文件。vl-file-copy 函数不会覆盖现有文件，而是将内容附加其后。
$ (vl-file-copy "c:/test.bat" "c:/newauto.bat")nil
复制失败，因为 newauto.bat 已经存在，而又没有指定 append 参数。

复制失败，因为 destination-file 已经存在，不会覆盖destination-file原文件，我日....我就要覆盖destination-file原文件啊...........

vitalgg 发表于 2025-5-28 09:34:01

(if (findfile distination-file)(vl-file-delete distination-file))

挚友02 发表于 2025-5-28 09:36:58

咋天我才发现这个问题，加上了这条
(if (findfile distination-file)(vl-file-delete distination-file))
唉，所有有关vl-file-copy 前面都在加这条，无语了。。。。

Bao_lai 发表于 2025-5-28 09:38:07

函数是死的，人是活的，尊重函数规则，利用函数规则。

kozmosovia 发表于 2025-5-28 09:49:32

重新定义一个vl-file-copy2，然后老代码全部替换一下-copy为-copy2。

挚友02 发表于 2025-5-28 10:11:20

给我了一个启发，我将vl-file-copy重新定义一下，这样就可以不用将所有有关vl-file-copy的原程序进行改动了:D-

llsheng_73 发表于 2025-5-28 10:42:02

挚友02 发表于 2025-5-28 10:11
给我了一个启发，我将vl-file-copy重新定义一下，这样就可以不用将所有有关vl-file-copy的原程序进行改动了 ...

重新定义系统函数或符号，加载的时候就会提示，很讨厌也比较麻烦的
5#的才是完美解决方案

332398174 发表于 2025-5-31 13:53:09


前两天才刚知道激情都能换币，多灌点水，币就有了，
页: [1]
查看完整版本: 要命的事，以前怎么没发现。。。。