2007-11-21 14:17 UTC
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
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)
)