+ Reply to Thread
Page 1 of 2 1 2 LastLast
Results 1 to 10 of 12
  1. #1
    Senior Member gS7's Avatar
    Computer Details
    gS7's Computer Details
    Operating System:
    Windows Xp sp3
    RAM:
    4 GB
    Monitor:
    Viewsonic
    Discipline
    Surveying
    gS7's Discipline Details
    Occupation
    Drafts man / Surveyor
    Discipline
    Surveying
    Using
    AutoCAD 2009
    Join Date
    May 2012
    Location
    Udupi,INDIA
    Posts
    238

    Smile Convert to autolisp code

    Registered forum members do not see this ad.

    Hey Guys ..

    Code:
    ;Codes Copied from Afralisp website
    ;Copyright © 1999 by Kenny Ramage
    ;All rights reserved. 
    
    
    (defun c:al-getpoint()
    
    (vl-load-com)
    
    (setq util (vla-get-utility 
                       (vla-get-activedocument 
                            (vlax-get-acad-object))))
                            
    (setq thepoint (vla-GetPoint util nil "\nFirst Point : "))
    
    (princ thepoint)
    
    (princ)
    
    )

    Here I want to Know How to convert #<variant 8197 ...> file to Autolisp code
    Ganesh Shetty

  2. #2
    Luminous Being Tharwat's Avatar
    Discipline
    Mechanical
    Tharwat's Discipline Details
    Occupation
    MEP AutoCAD Draughtsman
    Discipline
    Mechanical
    Details
    HVAC, Drainage, Water Supply, Fire Fighting and a little about Electricity.
    Using
    AutoCAD 2017
    Join Date
    Oct 2009
    Location
    Great Syria , Living in Abu Dhabi
    Posts
    6,246

    Default

    Like this ...

    Code:
    (princ (vlax-safearray->list (vlax-variant-value thepoint)))

  3. #3
    Senior Member gS7's Avatar
    Computer Details
    gS7's Computer Details
    Operating System:
    Windows Xp sp3
    RAM:
    4 GB
    Monitor:
    Viewsonic
    Discipline
    Surveying
    gS7's Discipline Details
    Occupation
    Drafts man / Surveyor
    Discipline
    Surveying
    Using
    AutoCAD 2009
    Join Date
    May 2012
    Location
    Udupi,INDIA
    Posts
    238

    Default

    Thank u for the Quick response Tharwat ..

    another doubt how to convert Variant to safe array
    Ganesh Shetty

  4. #4
    Luminous Being Tharwat's Avatar
    Discipline
    Mechanical
    Tharwat's Discipline Details
    Occupation
    MEP AutoCAD Draughtsman
    Discipline
    Mechanical
    Details
    HVAC, Drainage, Water Supply, Fire Fighting and a little about Electricity.
    Using
    AutoCAD 2017
    Join Date
    Oct 2009
    Location
    Great Syria , Living in Abu Dhabi
    Posts
    6,246

    Default

    Quote Originally Posted by gS7 View Post

    another doubt how to convert Variant to safe array
    Code:
    (if (setq pt (getpoint "\n Specify point :"))
      (vlax-safearray-fill (vlax-make-safearray vlax-vbDouble '(0 . 2)) pt)
    )

  5. #5
    Senior Member gS7's Avatar
    Computer Details
    gS7's Computer Details
    Operating System:
    Windows Xp sp3
    RAM:
    4 GB
    Monitor:
    Viewsonic
    Discipline
    Surveying
    gS7's Discipline Details
    Occupation
    Drafts man / Surveyor
    Discipline
    Surveying
    Using
    AutoCAD 2009
    Join Date
    May 2012
    Location
    Udupi,INDIA
    Posts
    238

    Default

    Man !! you are Awesome Thank you Again ..today i am Learning Safe array Function
    Ganesh Shetty

  6. #6
    Luminous Being Tharwat's Avatar
    Discipline
    Mechanical
    Tharwat's Discipline Details
    Occupation
    MEP AutoCAD Draughtsman
    Discipline
    Mechanical
    Details
    HVAC, Drainage, Water Supply, Fire Fighting and a little about Electricity.
    Using
    AutoCAD 2017
    Join Date
    Oct 2009
    Location
    Great Syria , Living in Abu Dhabi
    Posts
    6,246

    Default

    Quote Originally Posted by gS7 View Post
    Man !! you are Awesome Thank you Again ..
    You're welcome .

    Quote Originally Posted by gS7 View Post
    today i am Learning Safe array Function
    Good Luck .

  7. #7
    Senior Member gS7's Avatar
    Computer Details
    gS7's Computer Details
    Operating System:
    Windows Xp sp3
    RAM:
    4 GB
    Monitor:
    Viewsonic
    Discipline
    Surveying
    gS7's Discipline Details
    Occupation
    Drafts man / Surveyor
    Discipline
    Surveying
    Using
    AutoCAD 2009
    Join Date
    May 2012
    Location
    Udupi,INDIA
    Posts
    238

    Default

    Any other easiest way to learn Safe Array function ?
    Ganesh Shetty

  8. #8
    Luminous Being Tharwat's Avatar
    Discipline
    Mechanical
    Tharwat's Discipline Details
    Occupation
    MEP AutoCAD Draughtsman
    Discipline
    Mechanical
    Details
    HVAC, Drainage, Water Supply, Fire Fighting and a little about Electricity.
    Using
    AutoCAD 2017
    Join Date
    Oct 2009
    Location
    Great Syria , Living in Abu Dhabi
    Posts
    6,246

    Default

    Quote Originally Posted by gS7 View Post
    Any other easiest way to learn Safe Array function ?
    I am afraid not , but why you feel it is hard to learn ?
    Otherwise Lisp function still faster and easier with powerful abilities .

    Nothing comes easily

  9. #9
    Senior Member gS7's Avatar
    Computer Details
    gS7's Computer Details
    Operating System:
    Windows Xp sp3
    RAM:
    4 GB
    Monitor:
    Viewsonic
    Discipline
    Surveying
    gS7's Discipline Details
    Occupation
    Drafts man / Surveyor
    Discipline
    Surveying
    Using
    AutoCAD 2009
    Join Date
    May 2012
    Location
    Udupi,INDIA
    Posts
    238

    Default

    Quote Originally Posted by Tharwat View Post
    but why you feel it is hard to learn ?
    While learning I Get so much confusions so Feels Like That ...Think Its a Starting Trouble ..
    Ganesh Shetty

  10. #10
    Luminous Being Tharwat's Avatar
    Discipline
    Mechanical
    Tharwat's Discipline Details
    Occupation
    MEP AutoCAD Draughtsman
    Discipline
    Mechanical
    Details
    HVAC, Drainage, Water Supply, Fire Fighting and a little about Electricity.
    Using
    AutoCAD 2017
    Join Date
    Oct 2009
    Location
    Great Syria , Living in Abu Dhabi
    Posts
    6,246

    Default

    Registered forum members do not see this ad.

    Quote Originally Posted by gS7 View Post
    While learning I Get so much confusions so Feels Like That ...Think Its a Starting Trouble ..
    Keep on working on your goal and you would become very familiar with functions if you had the willing to .

Similar Threads

  1. Create Shortcut Through AutoLISP Code
    By Ahankhah in forum AutoLISP, Visual LISP & DCL
    Replies: 10
    Last Post: 29th Apr 2011, 02:24 pm
  2. Close a folder by AutoLISP code
    By Ahankhah in forum AutoLISP, Visual LISP & DCL
    Replies: 6
    Last Post: 26th Apr 2011, 02:39 pm
  3. Please help me understand this autolisp code
    By Brick_top in forum AutoLISP, Visual LISP & DCL
    Replies: 5
    Last Post: 10th Nov 2009, 01:01 pm
  4. I need an AutoLisp code please!
    By facad in forum AutoLISP, Visual LISP & DCL
    Replies: 7
    Last Post: 18th Sep 2009, 09:32 pm
  5. Can I use FLATSHOT in Autolisp code?
    By DryWater in forum AutoLISP, Visual LISP & DCL
    Replies: 2
    Last Post: 4th Apr 2009, 05:40 pm

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts