Serge

fred13400, Dans le rendu, les lignes s'estompent. Si tu veux te débarraser complètement des lignes de mosaïque (tesselation lines) en mode normal, tu peux toujours geler le calque :-) Sinon, il y a une panoplie de variables dans les options, telles que citées. Pour réduire le nombre de lignes (par défaut 4), on peut jouer avec ISOLINES Serge

À tous, En passant, j'ai déjà sondé le terrain sur le besoin d'un livre en AutoLISP, pour débutant, avancé ou même comparer VB et Lisp. Je n'ai reçu qu'une réponse. De quoi refroidir l'élan .... Serge

clicclac20, La méthode de Pako nécessite l'ajout d'une référence, donc diffusion un peu plus complexe. Il y a le CommonDialog, mais d'une part, l'interface n'est pas moderne et tu devras déployer le contrôle si les usager sont sous NT ou 98. Il existe une meilleure technique dont tu pourras te renseigner en visitant le site de Microsoft à l'adresse suivante: http://support.microsoft.com/default.aspx?scid=http://support.microsoft.com:80/support/kb/articles/Q161/2/86.asp&NoWebContent=1 Voici un exemple: Option Explicit Private Declare Function GetOpenFileName Lib "comdlg32.dll" _ Alias _ "GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long Private Type OPENFILENAME lStructSize As Long hwndOwner As Long hInstance As Long lpstrFilter As String lpstrCustomFilter As String nMaxCustFilter As Long nFilterIndex As Long lpstrFile As String nMaxFile As Long lpstrFileTitle As String nMaxFileTitle As Long lpstrInitialDir As String lpstrTitle As String flags As Long nFileOffset As Integer nFileExtension As Integer lpstrDefExt As String lCustData As Long lpfnHook As Long lpTemplateName As String End Type Private Sub Command1_Click() Dim OpenFile As OPENFILENAME Dim lReturn As Long Dim sFilter As String OpenFile.lStructSize = Len(OpenFile) sFilter = "Batch Files (*.bat)" & Chr(0) & "*.BAT" & Chr(0) OpenFile.lpstrFilter = sFilter OpenFile.nFilterIndex = 1 OpenFile.lpstrFile = String(257, 0) OpenFile.nMaxFile = Len(OpenFile.lpstrFile) - 1 OpenFile.lpstrFileTitle = OpenFile.lpstrFile OpenFile.nMaxFileTitle = OpenFile.nMaxFile OpenFile.lpstrInitialDir = "C:\" OpenFile.lpstrTitle = "Use the Comdlg API not the OCX" OpenFile.flags = 0 lReturn = GetOpenFileName(OpenFile) If lReturn = 0 Then MsgBox "The User pressed the Cancel Button" Else MsgBox "The user Chose " & Trim(OpenFile.lpstrFile) End If End Sub Tu dois corriger le sFilter, le lpstrInitialDir et autres petits détails. Serge

dr.loveless, As-tu essayé ThisDrawing.SetVariable "CMLSCALE", 100 Serge

Pko, MDSV31 a raison si tu es en 2004 ou 2005 ThisDrawing.SummaryInfo ' Tiré de l'aide ThisDrawing.SummaryInfo.Author = "John Doe" ThisDrawing.SummaryInfo.Comments = "Includes all ten levels of Building Five" ThisDrawing.SummaryInfo.HyperlinkBase = "http://www.autodesk.com" ThisDrawing.SummaryInfo.Keywords = "Building Complex" ThisDrawing.SummaryInfo.LastSavedBy = "JD" En 2002, il fallait fouiller dans le dictionnaire DWGPROPS. Serge

Patrick, En tout cas, si ça trouve, c'est déjà mieux qu'avec l'Explorateur de Windows. En pasant, il y a quelques années, ma banque m'a invité à payer mes factures au guichet automatique sans frais. Ceci a permis de 'libérer' du personnel. Maintenant, ça en coute plus cher qu'avant, service en moins. Serge

Tramber, Je vois que tu rectifie souvent tes messages. Pourtant: "verba volent, scripta manent" Excuse-moi, c'est vendredi :-)) Serge

Tramber, AutoCAD s'y est pris sur le tard pour gérer des unités et il le fait maintenant plus ou moins bien. Il existe 3 variables que le DC reconnaisse: INSUNITS INSUNITSDEFSOURCE INSUNITSDEFTARGET Je te laisse le plaisir de les découvrir dans l'aide. Quoi qu'il en soit, le DesignCenter seul est insuffisant car même si ces variables sont bien configurées, elles ne tiennent pas compte de l'échelle d'impression. C'est pourquoi l'usage de réacteurs est de mise (pour ceux que ça peut intéresser :-)). La plupart du temps, DIMSCALE est prise comme repère. Serge

matchbox20, Il y a au moins 4 façons: 1) ATTOUT (Express Tools, produit du format ASCII délimité par des Tab et accepté par Excel) 2) ATTEXTR (_ATTEXT ). Excel accepte les fichier texte délimités (cdf) et en format fixe (sdf) 3) EATTEXTE (_EATTEXTE). Produits du Xls directement 4) La programmation (VBA ou Vlisp) Serge

Patrick, Dans le manuel "L'univers AutoCAD 14" que tu as, tu pourras découvrir ces expressions et d'autres aux pages 798 à 801. Serge

Nobless, Ce ne sont pas les touche Ctrl+Alt+Suppr mais bien Ctrl+Alt+Delete. D'où crois-tu que le nom AutoCAD vienne ? Auto de Autodesk et CAD de ... Ctrl+Alt+Delete. Plus sérieusement, comme l'as mentionné les autres, un SaveTime court t'aidera. Par contre, il te faudra chercher à savoir pourquoi tu plantes régulièrement. Est-ce un problème de RAM défectueux, de RAM insuffisant ? Pour cela il y a justement les touches Ctrl+Alt+Del, onglet Performances. As-tu des paramètres trop gourmand dans AutoCAD pour tes besoins (e.g. LAYOUTREGENCTL = 0, VIEWRES = 50, etc.) Serge

Labletech, Effectivement, alloc et expand peuvent t'aider. Mais une meilleure modularité pourrait aussi aider. Est-ce posible de m'envoyer le code et un dessin à l'adresse suivante (en remplaçant le # par @ : cunivers#univers.qc.ca Serge

On peut en savoir davantage sur ce que je fais à l'adresse suivante: http://www.cadnovation.com/fr/cvsc.asp Par contre, ce que ça ne vous dira pas, c'est pourquoi j'en suis venu à faire du CAD et pourquoi j'y suis encore. C'est vendredi, et pour une raison X, je me sens entrainé à écrire un bout de ma vie, ce qui risque de ne pas intéresser grand monde mais peut me servir de thérapie :-))) Un jour, un journaliste à demandé à Salvador Dali: "Pourquoi avez-vous choisi la peinture?" Et Salvador de lui répondre: "Mais je n'ai pas choisi la peinture, c'est la peinture qui m'a choisie" À l'époque, je n'avais pas assez de vécu pour comprendre sa réponse. Ayant un profil plutôt logique qu'artistique, je trouvais même sa réponse un peu absurde. Puis un jour, le CAD s'est mit sur ma route, tout à fait par hasard. Je devais programmer un menu pour une tablette digitalisante qui dessinerait des layouts de presses (pour les imprimeries canadienne Gazette à Candiac). On m'avais donné 3 semaines pour y parvenir, à raisons de 2 jours semaines (soit 6 jours). Or, je ne connaissais ni la programmation de menu, ni AutoCAD, ni même le DOS. Beau défi ! J'y suis parvenu (sinon, je ne serais plus ici pour vous en parler). Bizarrement, au lieu de m'encourager, cela m'a plutôt rendu inquiet. Je ne pouvais absolument pas envisager faire carrière dans quelque chose qui s'apprennait aussi facilement. Pour l'instant, je ne pouvais que bénéficier d'une longueur d'avance mais qui serait vite rattapée. J'ai ensuite voulu me laissé tenter par un retour à l'école et faire une maitrise en contrôle des procédés. Je suis ingénieur chimique de formation. J'avais reçu notament une offre du MIT à Boston, une de Sherbrooke et une de McGill. Mais je vivais encore un déchirement interne entre le désir d'accomplissement, le désir d'en faire quelque chose et de me rassurer à savoir si j'avais posé mon échelle sur le bon mur. Ce "non choix" m'a continuellement hanté jusqu'à très récemment. J'ai quitté le monde du CAD un temps, mais le hasard de la vie m'a vite ramené sur 'la voie'. J'ai eu à dépanner un de mes amis et faire de la formation au collège de Granby (Urgente et gratuite - comme on a vu sur un autre forum, mais pour vrai). Le jour ou j'ai appris à ma mère que j'étais devenu prof, elle ne m'a vraiment pas cru. Moi aller à l'école? Disons en gros que je n'étais pas l'élève modèle, même si je réussissais. Ce poste m'a ultérieurement conduit à pondre 11 manuels sur AutoCAD, soit 8600 pages très bien tassées. J'ai souvent voulu arrêter d'en faire mais à chaque fois je recommençais. Cette fois-ci est surement la bonne, bien que..... En 1986, j'ai eu la chance de travailler à la Domtar à Lebel-sur-Quévillon. Une circonstance incroyable a voulu que ce poste soit mis sur la glace un an (sans jeu de mots, il y a de la neige 11 mois par année là-bas). J'ai donc continué à travailler dans le CAD en attendant. Lorsque le poste a été rouvert, je devais me trouver devant une autre croisée de chemin. J'ai bifurqué et pris la route pour Québec pour un poste d'ingénieur industriel. Mais le CAD m'a encore rattrapé. J'étais toujours très insécure à l'idée de travailler avec AutoCAD. J'ai cru que cet environnement serait éphémère. Je ne comprenais pas que les gens avaient besoin de formation. Je trouvais qu'on avait vite fait le tour du logiciel. J'arrivais quand même à faire des petits bijoux comme un calcul d'hydraulique pour des circuits en boucle pour la tiyauterie d'un terrain de golf, des calculs de tension pour la pose de cables en paires torsadées, des graphiques à échelle logarithmique et semi-logaritmique avec courbes de régression, des méthodes de caractérisation des sols, le tout dans AutoCAD 2.5. C'est en 1991 que j'ai compris que j'étais peut-être trop sévère à mon endroit. J'ai participé à un coucours pan-Américain intitulé Top-Gun, organisé par la revue Cadence lors d'un salon chez Autodesk en Californie. La réussite du premier test donnait droit à faire un 2-ième test qui allait à son tour servir à sélectionner les finalistes de chaque région pour une ultime rencontre à New York. Malheureusement pour moi, j'ai appellé le responsable (Tandy Walleby) en plein milieu du test en lui disant que tous ses choix étaient faux (et je lui en avais fait la preuve). Il m'a dit alors que j'étais contre la montre et que j'avai perdu beaucoup de temps. Dommage pour moi car cela m'a empêché de terminer ce quiz et possiblement devenir le représenatnt de la Californie. J'ai continué à communiquer avec Tandy par la suite. Il m'a alors confié que j'avais obtenu le meilleur score nord-américain lors du premier test sur tout près de 900 concurrants. Bon, ça me fait du bien de me taper dans le dos mais j'oublie ça vite. Est arrivé à peu près au même moment la version 11 et la possibilité de programmer en C. Cela m'a ouvert beaucoup d'autres horizons. Puis est arrivé la possibilité de faire du VB, des bases de données, etc. Aujourd'hui, je partage mon temps de travail entre des taches administratives, le développement (analyse et programmation), la vente et bien sur, répondre aux forums. Il m'arrive encore souvent de me demander ce que je fait dans le CAD mais même aujourd'hui, les hasards de la vie me ramène sur 'la voie'. Bon, il est tout près de 19:30. Je n'ai pas encore souper (on dit diner chez vous). Manger si tard peu conduire quelqu'un près du délire :-)))) Bonne fin de semaine à tous. Serge

Labletech, Tu peux fixer alloc à 100000 puis faire des garbage collection de temps à autre. Exemple 1: (alloc 100000) ;; à la fin du fichier lisp, s'éxécute une fois Exemple 2: (if (= (rem nBloc 100) 0) (gc)) ;; dans le while, faire un garbage collection tous les 100 itérations Dans les bonnes versions DOS (2.18 à R10_c2a), on avait une limite de mémoire Lisp due à la barrière du 640Ko. Il fallait se réserver 45ko pur le Heap et le Stack via le autoexec.bat, comme suit: LISPHEAP=6000 LISPSTACK=39000 Puis est venu PharLap, le DOS-Extender. On a cru que la gestion de mémoire était caduque, mais c'était faux. Dans certains cas, comme par exemple ton programme ou si on fait de très nombreuses sélections d'objets (j'ai déjà fait une routine qui quadrillait un plan en x et y intervalles, donx x par y sélections), AutoLISP ne libère pas la mémoire. Il faut donc en prévoir plus, ou la libérer. Serge

bipbip, Est-ce que la commande LISTE (_LIST) te donnes les bons résultats. Il y a une possibilité: lorsqu'on travaille avec de gros nombres, comme en cartographie, AutoCAD cafouille avec les modes d'accrochage. Est-ce le cas. Serge

irtxp, J'imagine que tu veux dire fixer l'échelle de la fenêtre? As-tu ouvert la barre d'outils "Fenêtres" ? Serge

Didier, C'est à cause du décalage horaire :-)))) Pour ce qui est des angles: Commande: (angtos pi 2 14) "200.0000000000000g" Serge

Tramber et Patrick, Ni l'un ni l'autre. LUPREC et AUPREC sont 2 variables concernant la commande UNITES (_UNITS) donc l'affichage dans la barre de statut, la commande LISTE (_LIST) , etc. Lorsqu'on utilise des expressions en Lisp, ça ne regarde que le Lisp. Il y a quelque chose de non évident pour quelqu'un qui débute en Lisp. Il ne faut pas confondre la valeur affichée sur la console et la valeur conservée en mémoire. De la version 2.18 à R11, AutoLisp affichait sur la console et conservait les nombres réels en simple précision (7 chiffres significatifs). Jusque là, ça allait bien. En R12, AutoLISP a commencé à ne traiter que la double précision à l'interne mais à afficher toujours la simple précision sur la console. Petite démonstration: Commande: (rtos pi 2 14) "3.14159265358979" Commande: !pi 3.14159 Dans le premier cas, on voit que PI vallait bien .3.14159265358979 avant d'être converti en chaine. Dans le 2ième cas, c'est le même nombre qui est amputé à l'affichage. Indépendemment ce cela, lorsque vous convertissez des nombres réels en chaine, méfiez vous de DIMZIN qui tronque les zéros si fixée à 8, sa valeur par défaut. Il faudrait prendre l'habitude de faire: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; Sauvegarde (setq oldDimzin (getvar "dimzin")) ; Afficher tous les zéros (setvar "dimzin" 0) ; Convertir le nombre en chaine, format décimal, 14 chiffres significatifs (setq anything (rtos value 2 14)) ; Restaure (setvar "dimzin" oldDimzin") ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Et dernière précision, les 2 derniers paramètres de rtos équivalent lunits et luprec. Serge

Tramber, Pourquoi un jeu de sélection? Pour constituer le bloc? Si c'est cela, c'est non. D'ailleurs Bruno et moi t'avons signaler le danger de mélanger des techniques de création telles que entmake, command et vla Par contre, il y a un work-around: (setq ss (ssget)) ; Sélection (setq i 0) (setq n (if ss (sslength ss) 0)) ; Nombre d'éléments (while (< i n) (setq element (ssname ss i)) ; ssname extrait l'élément de la sélection, l'index initial = 0 (setq elementGet (entget element)) (entmake elementGet) (setq i (1+ i)) ) Serge

Tramber, Question de te faire la main, dessine un objet puis tape (entget (entlast)). Tu verras rapidement les codes de l'objet. Parmi les codes dxf inutiles, et c'est l'expérience qui te guideras: -1, 5, 100, 300 à 500. Inclure ces codes n'est pas fatal mais peu nuire à la lecture ou à la vitesse à laquelle tu chemine. À titre d'exemple, tu peux cloner le dernier objet tout simplement comme suit: (entmake (entget (entlast))) Bonuscad, En fait, j'avais testé le code avant de créer les calques et ça bloquait. Je revérifierai plus tard. Par rapport au mixage de méthodes, j'ajouterai qu'il ne faut pas utiliser simultannément les (command ...) (entmake ...) et (vla-add ...) Et en passant, les Bonus sont devenus des Express ;-) Serge

Tramber, C'est une chanson qui jouait en 1981, Je t'ai trouvé une adresse pour savoir de quoi il s'agit: http://www.tmtfanclub.com/best.html Par rapport au livre, tu me tiendras au courant de tes démarches. Serge

Chel, J'ai déjà vu WHIPARC faire planter AutoCAD de la sorte. Il faut vérifier que cette varaible vaut 0. Serge

Mika, Va voir à cette adresse: http://usa.autodesk.com/adsk/servlet/index?siteID=123112&id=2753223&linkID=2475161 Serge

Coolman, As-tu déjà fait du support au grand public. J'ai du travaerser le "Twilight zone" bien souvent. Tiens, j'ai la chanson de Manhattan Transer en tête. Serge

Airad, Je te suggère d'effacer ton fichier mns, mnr, mnc avant de recompiler. Autre chose, crée toi un profil "Test" pour tes tests. Au lieu de recompiler, une fois les 3 fichiers effacés, tu fait un double-clic sur le nom de ton profil (depuis la boite Options évidemment) et tous se reconstruit tout seul sans même taper CHARGMENU (_MENULOAD) ou MENU. Si ta barre d'outils persiste à son ancien point d'ancrage, fait un Reset sur ton profil, recharge les menus et vérifie. Serge