Topic: Clearing Recent Files list

[GDF]

I'm trying to clear the recent files opened using the routine below without any luck:

Using Windows 10 BricsCAD V20 en_US.
Any suggestions?

Code: [Select]

(defun c:CleanRecentFiles (/ root m)
  (vl-load-com)
  (setq root (strcat "HKEY_CURRENT_USER\\" (VLAX-MACHINE-PRODUCT-KEY) "\\Recent Paths\\")
        m 0)
  (foreach item ((lambda   (/ n values val)
                   (setq n 0)
                   (while (setq val (vl-registry-read root (strcat "File" (itoa (setq n (1+ n))))))
                     (setq values (cons val values))
                     (vl-registry-delete root (strcat "File" (itoa n))))
                   (reverse values)))
    (if (wcmatch (strcase item) "*DWG")
      (vl-registry-write root (strcat "File" (itoa (setq m (1+ m)))) item)))
  (princ (strcat "\n" (itoa m) " DWG files remain in recent drawings list"))
  (princ))


[stevej]

My Bricscad V19 saves recent file list in HKEY_USERS:
Computer\HKEY_USERS\S-1-5-21-2508002406-3670995003-1946860359-1000\Software\Bricsys\BricsCAD\V19x64\en_US\Recent Paths

Steve

[GDF]

Thanks

[BIGAL]

Don't forget (vlax-product-key) handy for when V20

[roy_043]

Last time I checked this doesn't work. BricsCAD keeps a list in memory and writes it to the registry on exit. Any modifications you perform will be lost.