Recent posts

#11
Runtime/AutoLISP / Re: LISP to Load OpenDCL
Last post by DGCSCAD - September 12, 2024, 03:59:45 AM
Quote from: owenwengerd on September 11, 2024, 03:08:27 PMYou would need to restart before the new demand load registry keys are active. You could complete the install, then read the newly added demand load registry key via lisp to get the full path to the OpenDCL runtime module, then load it via (arxload).

Ok, thank you. I appreciate help, and the fast response.
#12
Runtime/AutoLISP / Re: LISP to Load OpenDCL
Last post by owenwengerd - September 11, 2024, 03:08:27 PM
You would need to restart before the new demand load registry keys are active. You could complete the install, then read the newly added demand load registry key via lisp to get the full path to the OpenDCL runtime module, then load it via (arxload).
#13
Runtime/AutoLISP / LISP to Load OpenDCL
Last post by DGCSCAD - September 11, 2024, 12:47:29 PM
Hi. First post here. Been a member of theSwamp for many years (deegeecees) and although I haven't used LISP much over the past 2 decades, I've been needing to get back into it recently.

I'm looking for a way to load OpenDCL on other PC's through a network via LISP.

I've put this together after some searching around, but it doesn't recognize ODCL after installing:

(defun checkodcl ()
(if (and (not dcl_project_load) (vl-cmdf "OPENDCL") (not dcl_project_load))
(progn
(startapp "msiexec.exe" (strcat "/i \"" "OpenDCL.Runtime.9.2.3.3.msi" "\""))
)
)
)

The MSI file is located in a support path, so it runs as it should. I'm not sure what I'm missing. Any help is appreciated.
#14
Studio/Dialog Editor / Re: Option Button vs Option Li...
Last post by owenwengerd - August 19, 2024, 09:01:52 PM
It would require adding custom themed painting to the option list control in OpenDCL, which is complicated, but not impossible.
#15
Studio/Dialog Editor / Option Button vs Option List s...
Last post by ScottBolton - August 18, 2024, 12:09:06 PM
Is there a way to get Option Button and Option List styles to be the same? OBs have a Use Visual Style property but OLs don't.

#16
Runtime/AutoLISP / DragnDrop on PictureBox
Last post by pawlix - August 01, 2024, 07:44:52 AM
Hi guys,
I wonder how to code the takeover file path when I dragndropfromother txt file on my PictureBox.
Can someone help me?
#17
Runtime/AutoLISP / Re: OnKeyUp event
Last post by pawlix - July 30, 2024, 09:21:26 AM
It does nothing. I just want that if I release SpaceBar then alert popup. Nothing else.
Do I need to do something more then just put that in my lisp code?
Obviusly keyup event is checked in opendcl project

Edit:
I think I handle it, but I have got more questions about it.
How to code it for Delete key?
Where and how should I put Flags?

Edit2:
I got it all. Thanks for your replay @owenwengerd, it was helpful. We can close the topic.
#18
Runtime/AutoLISP / Re: OnKeyUp event
Last post by owenwengerd - July 30, 2024, 09:16:00 AM
Try this:
(defun c:project/Form4/ListView1#OnKeyUp (Character RepeatCount Flags /)
  (if (= Character " ") (alert "SPACEBAR was released"))
)
#19
Runtime/AutoLISP / OnKeyUp event
Last post by pawlix - July 30, 2024, 09:04:53 AM
Hello guys!
I'm kinda new in this world, could someone help me with OnKeyUp event?
I would love to use it in my ListView by pressing SpaceBar but I have no clue how to do that becouse of those Characters and Flags :/
Currently my code seems like this:
Quote(defun c:project/Form4/ListView1#OnKeyUp (Character RepeatCount Flags /)
  (setq Character "SpaceBar")
  (setq RepeatCount 0)
  (setq Flags 0)
  (alert "OK")
)

Can someone help me?
#20
Runtime/AutoLISP / Re: Set ButtonToolTips for Opt...
Last post by ScottBolton - July 25, 2024, 02:10:27 AM
This still appears to not work. Hardcoding the list in Studio works; assigning in lisp doesn't.

(dcl-Control-GetButtonToolTipList executed later in the lisp returns the desired list)