Jump to content

How to Create Lisp Dialog Box???


Recommended Posts

Guest balajibth84
Posted

Hai here Balaji...Actually we are using more Lisp....My mentioned command(I will prepare the command detail) i want to shown through Dialog Box..Just i am enter One Command means One Dialog box need to Shown My all mentioned Detail...

Ex:One notepad i will create my lisp detail with command...After loding lisp just i am giving help means my given command(Notepad Data) need to shown with big dialog box...Plz see below mentioned details:

 

Selected Feature Layer Change to Dim layer-"dd"

Selected Feature Layer Change to 5H layer-"5h"

Selected Feature Layer Change to 4H layer-"4h"

Selected Feature Layer Change to 4C layer-"4c"

Selected Feature Layer Change to 5C layer-"5c"

Selected Feature Layer Change to 1C layer-"1c"

Selected Feature Layer Change to Phantom layer-"pp"

Selected Feature Layer Change to T1 layer-"t1"

Selected Feature Layer Change to T2 layer-"t2"

Selected Feature Layer Change to TXT layer-"txt

For Layer Check-"Lc"

Break at Point-"at"

Intersection Break-"ib"

Change the Text angle as per the Line angle-"roo"

Selected Feature Change the Colour to RED-"rr"

Selected Feature Change the Colour to Yellow-"yy"

Selected Feature Change the Colour to ByLayer-"bb"

Place the Fixed size Circle to 0(Zero) Layer-"1"

For text Export-"te"

For decimal digit change-"de"

For Offset the Line between 2 Selected line-"2L"

 

 

When i have doubt i want classify with help dialog box While i want...How to create that Dialog box????Can you help me...Bcoz we are using so many lisp..While we have doubt in that time we will use this help dialogbox option....

  • Replies 34
  • Created
  • Last Reply

Top Posters In This Topic

  • Lee Mac

    6

  • Lt Dan's legs

    4

  • BlackBox

    3

  • The Buzzard

    2

Posted

I think you would need to write a DCL file to definine a dialog box. I could be wrong.

Posted
I think you would need to write a DCL file to definine a dialog box.

 

Given that the OP is writing code using LISP... that is correct.

 

Note - If writing code using another language... VBA, or C#.NET (for example), one would use the VBAIDE, or Visual Studio respectively to develop their dialog box. There may be a way of cross-language support (i.e., using a VBAIDE form with LISP), but I am unsure of how this may be done.

 

Hope this helps!

Guest balajibth84
Posted

 

 

Hai I have seen this Link..I think its very useful....I want one help...Can u tell hw to create DCl????

I want to Shown the dialog box below mentioned info means in that link where is the code availble????bcoz i have tried one but its not work....

 

Selected Feature Layer Change to Dim layer-"dd"

Selected Feature Layer Change to 5H layer-"5h"

Selected Feature Layer Change to 4H layer-"4h"

Selected Feature Layer Change to 4C layer-"4c"

Selected Feature Layer Change to 5C layer-"5c"

Selected Feature Layer Change to 1C layer-"1c"

Selected Feature Layer Change to Phantom layer-"pp"

Selected Feature Layer Change to T1 layer-"t1"

Selected Feature Layer Change to T2 layer-"t2"

Selected Feature Layer Change to TXT layer-"txt

For Layer Check-"Lc"

Break at Point-"at"

Intersection Break-"ib"

Change the Text angle as per the Line angle-"roo"

Selected Feature Change the Colour to RED-"rr"

Selected Feature Change the Colour to Yellow-"yy"

Selected Feature Change the Colour to ByLayer-"bb"

Place the Fixed size Circle to 0(Zero) Layer-"1"

For text Export-"te"

For decimal digit change-"de"

For Offset the Line between 2 Selected line-"2L"

 

 

Thanks in Advance....

Posted (edited)
Hai I have seen this Link..I think its very useful....I want one help...Can u tell hw to create DCl????

 

That link does contain information on how to create DCL files and how to control them using autolisp.

The HELP file that comes with AutoCAD also contains this information.

Another place = http://www.afralisp.net/dialog-control-language/tutorials/index.php?category_id=12

Edited by rkmcswain
correct spelling
Posted

Are you looking for alert??

 

example:

 
(defun c:test nil
 (alert 
   (strcat "Hello " (getvar 'loginname) 
           "\n\n*Some useless info*\nProfile name: " 
           (getvar 'cprofile) " \nDwg Name: " (getvar 'dwgname) 
           "\nIs this what you're looking for?"
   )
 )
 (princ)
)

Guest balajibth84
Posted

Hai Dan"s Ya this code only i am expected..Thanks a Lot....Then how can i add my below mentioned Command line to this code????Plz for sample just add 2 lines....

 

Selected Feature Layer Change to Dim layer-"dd"

Selected Feature Layer Change to 5H layer-"5h"

Selected Feature Layer Change to 4H layer-"4h"

Selected Feature Layer Change to 4C layer-"4c"

Selected Feature Layer Change to 5C layer-"5c"

Selected Feature Layer Change to 1C layer-"1c"

Selected Feature Layer Change to Phantom layer-"pp"

Selected Feature Layer Change to T1 layer-"t1"

Selected Feature Layer Change to T2 layer-"t2"

Selected Feature Layer Change to TXT layer-"txt

 

 

Thanks in Advance.........

Guest balajibth84
Posted

And After command *Some Useless Info* this line is coming to that dialog box..So hw to remove this line?????And profile name means what is the means here??Bcoz its shown unnamed profile.....We want to mentioned anything here(Profile Name)?

Guest balajibth84
Posted

After Adding its not coming line by line....Its coming like a continues paragraph....I want to show below mentioned like line by line...

 

For Sample:

Selected Feature Layer Change to Dim layer-"dd"

Selected Feature Layer Change to 5H layer-"5h"

Selected Feature Layer Change to 4H layer-"4h"

Posted (edited)

\n

 

Example:

 
(alert "[b][color=darkred]\n[/color][/b]Testing line one[b][color=darkred]\n[/color][/b]Line two[b][color=darkred]\n[/color][/b]Line three[b][color=darkred]\n[/color][/b]etc.")

 

 

or in dcl

dcl.LSP

Temp.DCL

Edited by Lt Dan's legs
Guest balajibth84
Posted

Hai Dan's Thanks For u r Help…..Here How to Include Font Style???I want that entire Dialog Box Font Style is “Comic Sans MS”….Its Good For looking .So inly I am asking….Thanks in advance…….How to Change to “Comic Sans MS” font????….

Guest balajibth84
Posted
This has already been answered, re-read post #13.

 

Hai i have seen already that link website.There its shown 3 links.I am seen .But i cannot able to find out the code for my Text style(Comic Sans MS) Change code.So Only i am asked.So Kindly plz filter that Code(Alert Box Text Style Change) for me.

Posted

You will have to learn how to use OpenDCL, I very much doubt it is a simple line of code. Don't expect to immediately accomplish what you want to achieve, it takes time and effort to learn the coding - not just have someone hand it to you.

 

If you show some effort to learn, others will be more inclined to help you along the way.

Guest balajibth84
Posted
You will have to learn how to use OpenDCL, I very much doubt it is a simple line of code. Don't expect to immediately accomplish what you want to achieve, it takes time and effort to learn the coding - not just have someone hand it to you.

 

If you show some effort to learn, others will be more inclined to help you along the way.

 

 

OK Sure.Its need Some Basic Knowledge(Programmee).I am a Beginner.But i am also know for that text Style change its a Simple code.So while u r find out that code plz give that code here openly....

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Unfortunately, your content contains terms that we do not allow. Please edit your content to remove the highlighted words below.
Reply to this topic...

×   Pasted as rich text.   Restore formatting

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.


×
×
  • Create New...