OpenDCL Forums

OpenDCL => Runtime/AutoLISP => Topic started by: stephan_35 on September 18, 2009, 12:59:16 PM

Title: OnclickedEvent not launch with BeginDragnDrop allowed on GraphicsButton Control
Post by: stephan_35 on September 18, 2009, 12:59:16 PM
Hello,

Here is something, maybe not a bug, but something impossible to do with a graphics button.

OnClicked Event is not call with Drag/Drop begin allow checked !

Here is an example :

Code (autolisp) Select

(dcl_project_load "D:/gb" T)
(defun c:gb_gb:demo_GraphicButton1_OnClicked (/)
  (dcl_MessageBox "To Do: code must be added to event handler\r\nc:gb_gb:demo_GraphicButton1_OnClicked" "To do")
)
(defun c:html_gb:demo_ListBox1_OnDragnDropFromControl (ProjectName FormName ControlName DropPoint /)
  (alert (strcat "\n c:html_gb:demo_ListBox1_OnDragnDropFromControl " ProjectName" " FormName " " ControlName))
)
(dcl_Form_Show gb_gb:demo)

Title: Re: OnclickedEvent not launch with BeginDragnDrop allowed on GraphicsButton Control
Post by: owenwengerd on September 19, 2009, 07:12:48 PM
I've added code in Alpha 5 to fake the OnClicked event when no drag/drop takes place.  Excellent sample, by the way -- that makes my job a lot easier.