DenisHen Posté(e) le 4 octobre 2006 Posté(e) le 4 octobre 2006 Bonjour à tous J'ai installé le gratuiciel "ObjectDCL" mais je n'arrive à rien... L'aide est en anglais et est trop simpliste, le site ne répond pas.... Quelqu'un en connait un peu plus ? Merci... Denis... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
DenisHen Posté(e) le 4 octobre 2006 Auteur Posté(e) le 4 octobre 2006 Désolé, je n'avais pas vu qu'il y avait déjà un forum "ObjetDCL"... (Je ne comprend que maintenant, pourtant Gile m'avait fait un lien....) PFFFF Je me décole les paupières et je m'y rend... Denis... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
Tramber Posté(e) le 4 octobre 2006 Posté(e) le 4 octobre 2006 Si je peux aider (2 ans d'experience ODCL), publie ton code mais aussi ton ODC, pour cela, il faut uploader quelque part, on a déjà parlé de ce genre de possibilité dans le forum Cadxp, comment ca marche. Bureau d'études dessin. Spécialiste Escaliers Développement - Formation ./__\. (.°=°.)
DenisHen Posté(e) le 4 octobre 2006 Auteur Posté(e) le 4 octobre 2006 Bonsoir à tous, Merci mille fois Tramber, mais je pense à ObjectDCL parce que j'ai commencé une routine en LiSP et sans boite de dialogue, je ne pense pas m'en sortir. J'aimerais que cette routine reste conviviale pour l'utilisateur... Mais je vais tenter, cela me prendra facillement plusieurs jours, de synthétiser mon code pour l'associé à une boite de dialogue qui n'existe pas encore... Mais je me demande, en écrivant ces lignes, si ce ne serait pas plus simple en VBA... Car c'est juste une fenêtre avec des "TextBox" pour en final créer un unique texte multiligne... Mais si je trouve la solution en VBA, je pourrais te la poster si le jeu te convient... Je continu de chercher... Nul doutes, je trouverais... Merci... Denis... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
Patrick_35 Posté(e) le 4 octobre 2006 Posté(e) le 4 octobre 2006 SalutC'est une simple boite pour saisir du texte ?Dans ce cas, utilise cette routine (defun InputBox (Titre Message Defaut / *acad* users1 valeur) (setq *acad* (vlax-get-acad-object) users1 (getvar "users1")) (acad-push-dbmod) (vla-eval *acad* (strcat "ThisDrawing.SetVariable \"USERS1\"," "InputBox (\"" Message "\", \"" Titre "\", \"" Defaut "\")")) (setq valeur (getvar "users1")) (setvar "users1" users1) (acad-pop-dbmod) valeur ) @+ Les Lisps de PatrickLe but n'est pas toujours placé pour être atteint, mais pour servir de point de mire.Joseph Joubert, 1754-1824
DenisHen Posté(e) le 4 octobre 2006 Auteur Posté(e) le 4 octobre 2006 PS pour Tramber ( ou autres ) : Je sais que tu est callé en Vlisp et, si mes souvenirs sons bons, tu connais le VBA... Mon sujet est : J'ai (vlax-ldata-put "Phalene" "AngSCU" (angle p1 p2)) que je stock depuis une routine... et j'utilise :(vlax-ldata-get "Phalene" "AngSCU") dans plein d'autres routines... (je le sais, c'est toi qui me l'as appris ;) ) Ma question est : Comment récupérer l'Xdata "Phalene" "AngSCU" depuis le VBA...? Merci... Denis... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
Tramber Posté(e) le 4 octobre 2006 Posté(e) le 4 octobre 2006 Je sais que tu est callé en Vlisp et, si mes souvenirs sons bons, tu connais le VBA... Mauvaise pioche. Je n'y connais rien du tout (mais alors rien de rien). En revanche, j'interviens quand les gens sont perdus avec les noms de commande en Anglais, par exemple. Moi je pense à créer un petit tuto pour démarrer avec ODCL, et ton exemple semble un bon point de départ. Je ferai peut-être ca ce WE ! Bureau d'études dessin. Spécialiste Escaliers Développement - Formation ./__\. (.°=°.)
DenisHen Posté(e) le 4 octobre 2006 Auteur Posté(e) le 4 octobre 2006 Mille excuses, ce doit être Patrick_35.... C'est ce qui est dommage quand on ne cotoye pas de visu... Je tente de te faire un truc compréhensible pour vendredi...Mais pô sur... Denis... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
Patrick_35 Posté(e) le 4 octobre 2006 Posté(e) le 4 octobre 2006 Comment récupérer l'Xdata "Phalene" "AngSCU" depuis le VBA...? Regarde ce post @+ Les Lisps de PatrickLe but n'est pas toujours placé pour être atteint, mais pour servir de point de mire.Joseph Joubert, 1754-1824
(gile) Posté(e) le 4 octobre 2006 Posté(e) le 4 octobre 2006 Je ne connais rien en VBA non plus, mais il me semble qu'on utilise les variables système USERSn, USERIn et USERRn pour passer des données d'un langage à l'autre. (setvar "USERR1" (vlax-ldata-get "Phalene" "AngSCU")) , pour attribuer la valeur à la variable, pour la récupérer en VBA, je te laisse faire. Gilles Chanteau - gileCAD - GitHub Développements sur mesure pour AutoCAD
DenisHen Posté(e) le 4 octobre 2006 Auteur Posté(e) le 4 octobre 2006 C'est donc bien Patrick_35 qui en connait un rayon en VLisp... Dont je me sers à ne plus savoir qu'en faire ! ! ( c'est donc à lui que dois d'en connaitre un minimum...) Sont-ce des variables (les Xdatas) qui encombrent les DWG ? Ce qui m'étonne (dans ce que dit Grand Gile), c'est que les USERS sont limités, et pas les XData... Et que : dans ce que j'ai compris des Xdata, c'est que c'est une variable qu'on créer en l'ajoutant au dessin...Il est nullement question d'un utilisateur, mais plutôt d'un "utilisé"... Mais je cherche... Je cherche... Denis... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
(gile) Posté(e) le 4 octobre 2006 Posté(e) le 4 octobre 2006 Je n'ai pas dit que les USER* et les Xdata c'est pareil, je donne juste un moyen de faire passer une valeur d'un langage de programmation à un autre. Il y a peut-être un moyen de récupérer les Xdata en VBA, je ne le connais pas. Gilles Chanteau - gileCAD - GitHub Développements sur mesure pour AutoCAD
Patrick_35 Posté(e) le 4 octobre 2006 Posté(e) le 4 octobre 2006 Je ne connais pas la syntaxe exacte en vba mais je pense que soit doit être du styleset Ma_var ThisDrawing.GetVariable "USERS1"Et comme le dit (gile), ne confond pas les deux. Tu dois faire avant le lire la variable en vba, la retranscrire en lisp --> ex : (setvar "USERS1" "MON'TEXTE")Tu as 3 types de USERle I --> Integer (entier)le R --> Real (réel)le S --> String (texte)et par type, tu as 5 variables possibles, ce qui fait qu'un USERS1 veux dire que c'est la première variable de type string pour permettre le lecture en vba ps : Pour ce qui est du vlisp, je pense que (gile) et bien d'autres t'on aussi aidé à progresser @+ Les Lisps de PatrickLe but n'est pas toujours placé pour être atteint, mais pour servir de point de mire.Joseph Joubert, 1754-1824
DenisHen Posté(e) le 4 octobre 2006 Auteur Posté(e) le 4 octobre 2006 ps : Pour ce qui est du vlisp, je pense que (gile) et bien d'autres t'on aussi aidé à progresser Tu m'étonne ! ! Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
DenisHen Posté(e) le 5 octobre 2006 Auteur Posté(e) le 5 octobre 2006 Bonsoir à tous, Bon, j'ai enfin trouvé un truc... Merci encore à vous, qui ne m'avez pas seulement aider à progresser, mais aussi à apprendre et , donc, à comprendre le LiSP... Le chemin est encore long pour atteindre un niveau honorable, mais bien accompagné, il n'y a plus de frontières... Merci encore... Je n'en serais jamais là sans vous... Donc, v'là mon truc (que j'ai eu dans un sujet du "VBA et VB" et c'est fabcad qui avait la réponse. Merci à lui) : ThisDrawing.SendCommand "(setvar " & """useri1""" & " (vlax-ldata-get " & """Phalene""" & " " & """Ech1""" & "))" & vbCr Echelle = ThisDrawing.GetVariable("useri1") MsgBox "Échelle du dessin : " & Echelle C'est plus du ressort du forum "VBA et VB", mais il fallait une "colclusion" pour clore ce sujet... Merci... Denis... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
DenisHen Posté(e) le 5 octobre 2006 Auteur Posté(e) le 5 octobre 2006 Moi je pense à créer un petit tuto pour démarrer avec ODCL, et ton exemple semble un bon point de départ. Je ferai peut-être ca ce WE ! J'ai déja fais une UserForm mais je ne sais pas comment la poster. Avec, tu comprendrais en une seconde, sinon, je posterai mon dvb. Écrire le ou les noms de propriétaire d'une parcelle cadastrale... La parcelle est défini par sa Section (string) et son numéro (real).(exemple : AN n°56, AN n°256, AP n°123, AP n°124........) Chaque parcelle peut avoir un ou plusieurs propriétaire, il y aa) le "plein propriétaire" qui donne "propriétaire" s'il est seul ou "propriétaires indivis" s'il sont plusieurs (mari et femmes, des frères, des petits enfants....b) le "nu propriétaire" : il ne possède la parcelles que "fiscalement" qui donne le ou les "nu propriétaires"c) l'"usufruitier" : il n'a droit que d'utiliser la parcelle qui donne le ou les "usufruitiers" La a) est toujours seul tandis que le b) est indissociable du c) Toutes ces personnes peuvent être représenté par une autre... Ce qui donnera dans le texte final (à écrire dans la parcelle) : Propriétaire :Monsieur TOPALOFF Michel ou Propriétaire :Commune de TRISOUILLE LES FLAQUETTESreprésenté par Monsieur BARBA Truc (Maire adjoint) ou alors : Propriétaires indivis :- Monsieur RENARD Jules représenté par Monsieur RENARD Gustave- Monsieur ALIEN 2 Salvador Et un petit dernier : Nu propriétaire :- Madame CLAUDE SimoneUsufruitiers :- Monsieur LAGAFFE Gaston représenté par Monsieur PRUNEL Guy-René- Monsieur CABREL Francis Bon, je pense avoir fais simple ... mais pour moi. Aucun problème pour d'autre renseignement... Et bon courage pour ton tuto... Moi, je vais bosser mon "Proprio.dvb" Denis... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
DenisHen Posté(e) le 6 octobre 2006 Auteur Posté(e) le 6 octobre 2006 J'ai déja fais une UserForm mais je ne sais pas comment la poster. Avec, tu comprendrais en une seconde, sinon, je posterai mon dvb. Ca y est, le dvb est fait... -vbarun;Proprio; Je le poste comment ? Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
Patrick_35 Posté(e) le 6 octobre 2006 Posté(e) le 6 octobre 2006 Bien denis :D Mais une questio, le Frm n'est pas un fichier texte ? @+ Les Lisps de PatrickLe but n'est pas toujours placé pour être atteint, mais pour servir de point de mire.Joseph Joubert, 1754-1824
DenisHen Posté(e) le 6 octobre 2006 Auteur Posté(e) le 6 octobre 2006 D'après ce que je sais, le fichier dvb (macro vba) contien des modules (macro "public") et des feuilles (userform) et d'autres trucs encore... Le tout tient dans le fichier dvb qui n'est pas ASCII, mais je pense qu'on peut les exporter en fichier ASCII type *.bas (module), *.frm (ffeuille), *.cls (classe).... Je tente de les publier, mais je ne sais pas trop comment tu pourras les récupérer... J'ai déjà fais des essais qui ont quasiment tous échoués... Denis... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
DenisHen Posté(e) le 6 octobre 2006 Auteur Posté(e) le 6 octobre 2006 Je vien de créer un fichier FRM (qui est en ASCII) qui fait 400 lignes. Mais VBA m'a créé un autre fichier avec, un frx qui lui, est "compilé"...mon dvb fait 60ko, le frm en fait 17 et le frx en fait 7... Je vais faire un tour dans VBA et VB... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
Tramber Posté(e) le 6 octobre 2006 Posté(e) le 6 octobre 2006 J'ai déja fais une UserForm mais je ne sais pas comment la poster. Avec, tu comprendrais en une seconde, sinon, je posterai mon dvb.. Nous ferons un autre sujet. Je n'ai rien à voir ici, la conversation tourne trop autour du VBA. Si j'ai le temps, je prépare tout ça ce WE. Bureau d'études dessin. Spécialiste Escaliers Développement - Formation ./__\. (.°=°.)
DenisHen Posté(e) le 6 octobre 2006 Auteur Posté(e) le 6 octobre 2006 Effectivement, je pensas aussi au "hors sujet"... Aucun problème... Je reste à ta disposition... Denis... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
Messages recommandés
Créer un compte ou se connecter pour commenter
Vous devez être membre afin de pouvoir déposer un commentaire
Créer un compte
Créez un compte sur notre communauté. C’est facile !
Créer un nouveau compteSe connecter
Vous avez déjà un compte ? Connectez-vous ici.
Connectez-vous maintenant