OpenDCL Forums

OpenDCL => Runtime/AutoLISP => Topic started by: Mast on November 21, 2007, 06:17:03 AM

Title: Need help
Post by: Mast on November 21, 2007, 06:17:03 AM
Hi all,
i need a little help for my first dock box. i have a invalid command with the Textbutton1 and 2. a don't andestand. Only the third button is ok and close the dockable box. Thanks
(Command "Opendcl")

(Defun C:Dock ()

   ; Call The Method To Load The Hello.Odcl File.

   (Dcl_Project_Load "Gddock" T)

   ; Call The Method To Show The Hello World Dialog Box Example

   (Dcl_Form_Show Gddock_Form1)

   (Princ)
)

(Defun C:Gddock_Form1_Textbutton1_Onclicked (/)

  (Command "_Layer" "In" "*" "O" "")
)


(Defun C:Gddock_Form1_Textbutton2_Onclicked ( /)

  (Command "_Layer" "Ac" "*" "")
)


(Defun C:Gddock_Form1_Textbutton3_Onclicked ( /)
     (Dcl_Form_Close Gddock_Form1)
)
Title: Re: Need help
Post by: owenwengerd on November 21, 2007, 07:11:39 AM
In OpenDCL Studio, change the 'EventInvoke' property for those two buttons to '1 - Allow Command'.
Title: Re: Need help
Post by: Mast on November 21, 2007, 07:41:30 AM
Thank you very much.