Boite de dialogue avec texte simple

[jalna]

Bonjour,

J'aimerais connaitre la formule magique pour ouvrir une boite de dialogue (.dcl) avec un texte fixe (que je pourrais modifier de temps en temps) à l’intérieur.

Par avance merci.

[lecrabe]

Hello

 

Une reponse debile pour le FUN :

 

(alert "Bonnes Fetes Jalna")

 

Bye, lecrabe

[DenisHen]

Salut,

 

Je pense que (gile) y a déjà pensé ici...http://pagesperso-orange.fr/gile/LISP/Dialog.lsp Mais c'est dans un LiSP, pas un DCL.

 

Denis...

[vincentp010]

Salut,

 

tu as l'exemple My Alert 1 sur ce bon site pour apprendre à utiliser les dcl

Getting Started with Dcl Dialogs

[jalna]

Merci, merci à vous

Excellent site Vincent...........

[jalna]

Hello

 

Une reponse debile pour le FUN :

 

(alert "Bonnes Fetes Jalna")

 

Bye, lecrabe

 

Bon à ta manière qui me suffit en fait!!

Par contre j'ai des problèmes d'alignements....... ech 1/10 et 1/20 puis sur 1/2000

Il y a peut être une meilleure présentation mais je veux avoir cette liste à proximité....

 

defun c:li()
(alert"
1/10 = 	0.1xp 		en mm

  			1xp 		en cm
  			
  			100xp 		en m

  			
1/20 = 	0.05xp		en mm

  			0.5xp 		en mm
  			
  			50xp		en m

  			
  	1/25 = 	0.04xp		en mm
  	
  			0.4xp 		en mm
  			
  			40xp		en m

  			
  	1/50 = 	0.02xp		en mm
  	
  			0.2xp 		en mm
  			
  			20xp		en m

  			
  	1/100 = 	0.01xp		en mm
  	
  			0.1xp 		en mm
  			
  			10xp		en m

  			
  	1/200 = 	0.005xp		en mm
  	
  			0.05xp 		en mm
  			
  			5xp		en m

  			
  	1/250 = 	0.004xp		en mm
  	
  			0.04xp 		en mm
  			
  			4xp		en m

  			
  	1/500 = 	0.002xp		en mm
  	
  			0.02xp 		en mm
  			
  			2xp		en m

  			
     1/1000 = 	0.001xp		en mm
     
  			0.01xp 		en mm
  			
  			1xp		en m

  			
     1/2000 = 	0.0005xp	en mm
     
  			0.005xp		en mm
  			
	  		0.5xp		en m

	  		
     1/5000 = 	0.0002xp	en mm
     
  			0.002xp 	en mm
  			
  			0.2xp		en m")

 

[x_all]

à imprimer et a scotcher sous ton écran jusqu’à les connaitre par cœur..

 

http://joch04.free.fr/tocad/tableau_echelle_fenetre.pdf

 

Sinon, il y a une autre méthode en renseignant une unité dans la boite de dialogue TRACER...

les échelles sont plus lisibles avec la liste

mais je fait comme toi, je laisse à 1/1 et je jongle avec de Z Xp...

[jalna]

à imprimer et a scotcher sous ton écran jusqu’à les connaitre par cœur..

 

Jsuis pas sur d'avoir de la place..........

Les avoirs sur un bouton directement dans AutoCAD me semble plutôt sympa!!

 

 

[jalna]

Ton echelle de 1/33,33 te sert souvent????

[x_all]

le 33 1/3 est une échelle couramment utilisée en pétrochimie, c'est le 10eme du tiers un peu comme le 50eme est le 10eme de 1/2...

 

c'est comme le 1/75 et le 1/125 c'est pas des échelles courantes, mais parfois la largeur des rouleaux étant limitée à 914, c'est bien pratique pour faire renter un plan dans le traceur :)

 

la phrase mémotchnique à retenir, c'est :

combien de mm pour une unité de dessin

 

par exemple 20mm pour 1m au 50eme d'ou z 20xp

[VDH-Bruno]

Bonsoir jalna

 

Par contre j'ai des problèmes d'alignements....... ech 1/10 et 1/20 puis sur 1/2000

\n pour un saut de ligne.

\t pour insérer une tabulation.

 

Voilà qui devrait t'aider, sinon pour l’exemple un code tapé à la volée sur les valeurs données précédemment :

(defun c:li ()
 (alert
   (apply
     'strcat
     (cons
"Liste des échelles: "
(apply
  'append
  (mapcar
    '(lambda (ech)
       (vl-list*
	 "\n\n1/"
	 (itoa ech)
	 " = "
	 (apply	'append
		(mapcar	'(lambda (unit)
			   (list "\t"
				 (rtos (/ 1 (cvunit ech "mm" unit)) 2 4)
				 " xp"
				 "\ten "
				 unit
				 "\n"
			   )
			 )
			'("mm" "cm" "m") ; liste des unitées
		)
	 )
       )
     )
    '(10 20 50 100 200 500 1000 2000 5000) ; liste des échelles
  )
)
     )
   )
 )
)

 

A+

[(gile)]

Salut,

 

Si c'est pour mettre dans un bouton, tu peux te faire un fichier texte formaté comme tu eux, et l'appeler avec la fonction LISP startapp (si le ficher Echelles.txt n'est pas dans un chemin de recherche il faut le chemin complet) :

 

(startapp "notepad.exe" "Echelles.txt")

[philsogood]

hello

je peux poser une question bête jalna? pourquoi n'tulises-tu pas la barre des échelles en bas à droite? tu peux créer facilement via SCRiPT les echelles que tu souhaites sur ton dessin. c'est à mon avis plus pratique que les Z .02xp (désolé je suis de la "nouvelle école" et taer z bidule m'a toujorus gonflé)

++

Phil

[x_all]

slt philsogood

si tu pouvais nous faire un rappel pour les vieux stp...

 

j'avoue jamais avoir trop chercher dans ce sens... sans doute parce que je ne me sert pas des objet annotatifs du coup j'ai jamais su comment ça marchai exactement...

je sais juste que ça existe...

[philsogood]

salut x_all

je sais plus où j'ai récupérer ce script mais je l'ai un peu modifié et du coup ej peux tirer des plans à l'chelle souhaiter sans me prendre la tête

les scripts (il a été défini pour les ficheirs en m, cm et mm)

http://cjoint.com/?CLtjXonEiBt

pour bien faire il faut purger les échelles avant pour éviter que se soit la zizanie (j'utilise le lisp jav à cet effet)

lancer le script avec l'unité qui va bien

puis définir l'échelle sur les fenètres de présentations

et voila!! :)

Phil

[philsogood]

Re

je rebondis sur le truc de gile c'est hyper simple mais c top comme manip pour ouvirir un fichier sans se prendre la tête depuis AutoCAD... je connaissais la manip mais n'avais jamais vu comment l'utiliser!

Phil

[jalna]

Salut à tous et merci

Plusieurs solutions je vais voir dans quel sens je vais partir effectivement une liste d'échelles est possible, pour le lisp de Bruno, je ne suis toujours pas aligné dans la boite de dialogue!!

La solution de faire appel à un fichier me semble plutôt pas mal