winfield

.........et qui comprennent l'angliche http://www.midpointcad.com/au/docs/lakose_The_Visual_LISP_Developers_Bible.pdf ..........pas de bol, c'est encore en anglais :(

Salut, Sans se pendre la tête, t'as ça http://perso.wanadoo.fr/maxence.delannoy/vba/att_excel.htm , c'est sûr c'est pas avec Access mais c'est grâcieusement offert par son auteur. Désolé je m'étais trompé de lien [Edité le 28/1/2006 par winfield]

Bonsoir, Trambler Tu confonds peut-être avec un "applicatif" qui permet de rallonger la liste déroulantes :casstet: , si c'est ça, le fichier se nomme "CxFixCombos15.arx", il fonctionne jusqu'au 2002 il me semble....à moins qu'ily ai eu une mise à jour.

Quand ça va pas je râle, alors quand ça va, faut le dire aussi :D Tj pour ma ptite personne, ce soir, c'est comme avant, donc ça roule ! Merci à Patrick et à AllloPass Bonne soirée

Bonsoir, Je crois que ça revient au même : panneau de config, ajout/suppression de progs et modifier

Bon ben on dirait que leur server à décider de se mettre au 35 h, ce soir c'est idem pour mon cas :(

Oups désolé, je pensais à parcourir les dossiers. Etant d'accord avec ce que Didier à dit précedemment, je me demande s'il faut que je te file un lien... Mais bon...lire, est une manière d'apprendre non ? même si on ne comprend pas tout du 1er coup... :( ex : le lien suivant http://www.cadxp.com/sujetXForum-3622.htm , je me pose encore pleins de questions dessus :casstet: En te souhaitant une bonne lecture.

Salut, Tu dois certainement avoir le bloc et le fichier "source" qui doivent porter le même nom. Ex : Tu as fait un wbloc avec comme nom "TOTO" et à l'intérieur de TOTO, tu dois avoir un bloc que t'as dû nommé également TOTO. Renomme soit l'un soit l'autre :)

Curieux Ci-dessous des infos d'un objet qui a un reactor : Commande: (entget (car(entsel))(list "*")) Choix de l'objet: ((-1 . ) (0 . "LWPOLYLINE") (5 . "2D") (102 . [surligneur] "{ACAD_REACTORS") [/surligneur] (330 . ) (102 . "}") (330 . ) (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 . "AcDbPolyline") (90 . 4) (70 . 128) (43 . 0.0) (38 . 0.0) (39 . 0.0) (10 77.2667 94.6668) (40 . 0.0) (41 . 0.0) (42 . 0.0) (10 214.787 118.278) (40 . 0.0) (41 . 0.0) (42 . 0.0) (10 392.477 109.306) (40 . 0.0) (41 . 0.0) (42 . 0.0) (10 509.3 45.0112) (40 . 0.0) (41 . 0.0) (42 . 0.0) (210 0.0 0.0 1.0)) Maintenant sur une copie de l'object qui a le reactor : Commande: (entget (car(entsel))(list "*")) Choix de l'objet: ((-1 . ) (0 . "LWPOLYLINE") (330 . ) (5 . "9CA") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 . "AcDbPolyline") (90 . 4) (70 . 128) (43 . 0.0) (38 . 0.0) (39 . 0.0) (10 572.309 222.176) (40 . 0.0) (41 . 0.0) (42 . 0.0) (10 709.829 245.787) (40 . 0.0) (41 . 0.0) (42 . 0.0) (10 887.519 236.814) (40 . 0.0) (41 . 0.0) (42 . 0.0) (10 1000.87 169.717) (40 . 0.0) (41 . 0.0) (42 . 0.0) (210 0.0 0.0 1.0)) Une copie ne copie pas le reactor ?

Je ne sais pas pour vous, mais là ça rame dur dur pour avoir une page CadXP :(

Même avis que Christian

Salut, Regarde ici http://www.cadxp.com/sujetXForum-7794.htm

Bonsoir, Oui mais en pensant bien que ça va modifier sur ts les blocs du dessins. REFEDIT (ou double clic sur le bloc si'il n'a pas d'attribut) CLOREREF pour finir

Ben koi ???? Lucky Luke à bien un 7 coups (le seul d'ailleur, dans tout le Phare Wouaist, fabriqué par son oncle si mes souvenirs sont bon :) ) et le père de John Connor est bien né après lui :casstet: (jamais rien compris d'ailleur) Oui mais ça ...pfff.... c'est nul......ça c'est quand ils évitent pas les balles........t'a pas looké Matrix ;)

Bon il est où ce manuel en Fr (à défauLt d'être made in France) :( ;)

Ce n'est peut-être pas le même truc muche, mais si c'est le cas, je mettais STARTUPTODAY à zéro.........enfin, ça n'a peut-être rien à voir :P

:o Tu ne sais pas ? 3615 Père noël evidemment...pfff :cool:

En bon élève modèle que je suis, je t'ammènerai une pomme.... (à condition que tu me files une image :cool: )

Que tu aimes beaucoup plutot...;) ...doit-on t'appeller "Papy" ?............. car tu radotes http://www.cadxp.com/sujetXForum-8029.htm :P

Oui mais franchement, quand tu débutes, c'est déjà difficile d'apprendre un langage et tout ce qui va avec, mais là, s'il faut étudier encore un autre langage dont les seuls docs sont en anglais, :o c'est very very very hard (si t'es pas anglophone). Enfin.....je n'étais pas plus avancé avant de me mettre au vba....

Très réaliste en effet

....en VLips........ :(

Re, Mon délire pourrait ressembler à ça : Pour le moment, vu que ce n'est qu'un test, il faut faire une polyligne, mettre un Txt et remplacer les handle correspondant dans le code....tout ça bien sûr, manuellement ;) Public Sub AcadDocument_EndCommand(ByVal CommandName As String) Select Case CommandName Dim ObjPoly As AcadEntity Dim ObjTxt As AcadEntity Case "STRETCH", "GRIP_STRETCH", "MOVE", "ROTATE", "SCALE", "DROPGEOM" For Each ObjPoly In ThisDrawing.ModelSpace If ObjPoly.Handle = "EF" Then surface = ObjPoly.Area For Each ObjTxt In ThisDrawing.ModelSpace If ObjTxt.Handle = "F1" Then ObjTxt.TextString = "S= " & Format(surface, "#0.#0")& " m2" End If Next End If Next End Select End Sub ....Faut peut-être que je creuse encore :casstet:

Bonsoir Didier et Patrick, et merci de vos réponses. Si je saisis bien : un reactor est un principe qui capte une commande et fait des choses en conséquence, ok..... ......mais peut être aussi par rapport à un objet... (pour ce dernier moi y en a pas comprendre ). Mais j'en reviens au fameux fichier de Didier. Si ma première définition est juste, le code que Didier a utilisé est l'équivalent des reators mais type VB, non ? :cool: De mémoire, le code de Didier, se traduisait par : ----------------------------------------------- Si l'utilisateur prend la commande Effacer tu n'effaces pas et tu envoie un message d'alerte. ------------------------------------------------- Donc par le même principe, on pourrait faire un truc du genre : ---------------------------------------------------------------------- Si l'utilisateur a pris la commande : "Liste de commandes" Regarde si ObjetPolyligneX a été modifié Si oui Surf=SurfaceObjetPolyligneX Recherche le ObjetTxtX ValTxt ObjetTxtX=Valeur TxtX -------------------------------------------- Et du coup on aurait un truc équivalent à ce qu'a fait Patrick......est-ce que je me trompe :casstet:

Décidément je suis encore à la traîne :mad: une MAJ s'impose ;)