lee50310 发表于 2023-12-18 06:38:32

<*** DCL面板設定+記憶功能+幻燈片(尺吋標註) ***>

本帖最后由 lee50310 于 2023-12-19 05:42 编辑

<***DCL面板設定+記憶功能+幻燈片(尺吋標註)***>



分享DCL面板設定+記憶功能+幻燈片 此面板設定擷取自 已發佈的 批量標註 Vˋ4.1版 程式
          只有面板完整的操作+記憶功能 程式(不含 批量尺寸標注程式這部份)
          用意: 了解DCL面板 記憶功能如何設定提供參考


TT2_CHS.RAR壓縮檔 內含TT.LSP 及 SLD資料夾


執行指令:TT



LYC688 发表于 2023-12-21 23:37:58

bai2000 发表于 2023-12-18 13:29
一直没找到院长的xyp-Dcl-Init子函数

(defun xyp-Dcl-Init ()
(setq dclPath (findfile "mydialog.dcl"))
(if dclPath
    (progn
      (setq dclId (load_dialog dclPath))
      (if (new_dialog "mydialog" dclId)
      (progn
          (set_tile "tile1" "Hello, World!")
          (action_tile "button1" "(setq user-clicked t)")
          (start_dialog)
      )
      )
      (unload_dialog dclId)
    )
    (prompt "\nFailed to find or load the DCL file.")
)
)

是不是这个

lee50310 发表于 2023-12-19 05:35:26

本帖最后由 lee50310 于 2023-12-19 05:38 编辑

xyp1964 发表于 2023-12-18 12:38
;; 感觉代码越简单越好
院長程式代碼的確很簡潔,
若相關的子函數也能分享出來 ,那就更好了!

xyp1964 发表于 2023-12-18 12:38:58


;; 感觉代码越简单越好




炫色ペ水域の 发表于 2023-12-18 08:41:41

明经的大神啊

xiao1984 发表于 2023-12-18 09:30:01

非常了不起

Noangler 发表于 2023-12-18 10:19:15

LEE大师厉害，感谢分享！

czb203 发表于 2023-12-18 10:59:32

大神一直在更新，感谢大大的分享

magicheno 发表于 2023-12-18 11:00:53

感谢大佬分享~

hzyhzjjzh 发表于 2023-12-18 12:33:13

谢谢楼主分享

guosheyang 发表于 2023-12-18 13:17:51

感谢lee50310的共享！

bai2000 发表于 2023-12-18 13:29:09

一直没找到院长的xyp-Dcl-Init子函数
页: [1] 2
查看完整版本: <*** DCL面板設定+記憶功能+幻燈片(尺吋標註) ***>