File tree Expand file tree Collapse file tree 3 files changed +3
-18
lines changed Expand file tree Collapse file tree 3 files changed +3
-18
lines changed Original file line number Diff line number Diff line change 11# Changelog
2+ - 2022-05-29 ** 1.0.6**
3+ - Add tab lisp function and support reload update lisp function
24- 2022-05-22 ** 1.0.5**
35 - Fix name string define attribute larger 64 character show eInvalidInput.
46 - Add some example learning curve.
Original file line number Diff line number Diff line change 1717const string projectName = "CadAddinManager" ;
1818const string outputName = "CadAddinManager" ;
1919const string outputDir = "output" ;
20- const string version = "1.0.5 " ;
20+ const string version = "1.0.6 " ;
2121var fileName = new StringBuilder ( ) . Append ( outputName ) . Append ( "-" ) . Append ( version ) ;
2222var project = new Project
2323{
Original file line number Diff line number Diff line change 22using Autodesk . AutoCAD . DatabaseServices ;
33using Autodesk . AutoCAD . Runtime ;
44using Application = Autodesk . AutoCAD . ApplicationServices . Core . Application ;
5-
65public class FunctionLispTest
76{
87 //Test : (displayfullname "First" "Last")
98 [ LispFunction ( "DisplayFullName" ) ]
109 public static void DisplayFullName ( ResultBuffer rbArgs )
11-
1210 {
1311 if ( rbArgs != null )
14-
1512 {
1613 string strVal1 = "" ;
17-
1814 string strVal2 = "" ;
19-
20-
2115 int nCnt = 0 ;
22-
2316 foreach ( TypedValue rb in rbArgs )
24-
2517 {
2618 if ( rb . TypeCode == ( int ) LispDataType . Text )
2719 {
2820 switch ( nCnt )
29-
3021 {
3122 case 0 :
32-
3323 strVal1 = rb . Value . ToString ( ) ;
34-
3524 break ;
36-
3725 case 1 :
38-
3926 strVal2 = rb . Value . ToString ( ) ;
40-
4127 break ;
4228 }
43-
4429 nCnt = nCnt + 1 ;
4530 }
4631 }
47-
48-
4932 Application . DocumentManager . MdiActiveDocument . Editor . WriteMessage ( "\n Name: " + strVal1 + " " + strVal2 ) ;
5033 MessageBox . Show ( "Updated" ) ;
5134 }
You can’t perform that action at this time.
0 commit comments