|
Fichier avec extention TLB |
|
Stagiaire WDF ![](http://old.wdforge.org/uploads/rank3e84154a75422.gif)
Inscrit: 28/06/2004 11:45
Post(s): 4
|
Bonjour,
Je voudrais savoir s'il est possible d'avoir acces aux fichier avec extention TLB.
Ex:
Je voudrais communiqué avec Autocad, mais le probleme il n'y a pas d'ActiveX mais que des fichiers TLB
Acad.tlb
En VB on peut y avoir acces mais j'ai pas trouvé la manipe en Windev
Manuel
Contribution le : 09/02/2006 09:53
|
|
|
Re: Fichier avec extention TLB |
|
Developpeur WDF ![](http://old.wdforge.org/uploads/rank3e8415c4d95b2.gif)
Inscrit: 21/06/2005 18:17
Post(s): 115
|
tu y accède comment avec VB ?
tu aurai un bout de code ... p-e ca pourrai être utile.
Contribution le : 09/02/2006 14:03
|
|
|
Re: Fichier avec extention TLB |
|
Stagiaire WDF ![](http://old.wdforge.org/uploads/rank3e84154a75422.gif)
Inscrit: 28/06/2004 11:45
Post(s): 4
|
Imports Autodesk.AutoCAD.ApplicationServices Imports Autodesk.AutoCAD.EditorInput Imports Autodesk.AutoCAD.Runtime
Cela marche seulement si autocad est installé.
Apres on peut faire ce type de programme
Dim pt(0 To 2) As Double Dim r As Double pt(0) = 10 'x pt(1) = 10 'y pt(2) = 0 'z toujours! r = 5 'r rayon
'crée le cercle autocad.AcadApplication.ActiveDocument.ModelSpace.AddCircle pt, r
C'est exemple qui trace un cercle dans autocad
Manuel
Contribution le : 09/02/2006 14:24
Edité par mdsv31 sur 9/2/2006 14:44:51
|
|
|
Re: Fichier avec extention TLB |
|
Developpeur WDF ![](http://old.wdforge.org/uploads/rank3e8415c4d95b2.gif)
Inscrit: 21/06/2005 18:17
Post(s): 115
|
MonObjetDynamique est un objet automation dynamique
Dim pt(0 To 2) As Double // Je ne sais pas a quoi correspond cette déclaration
r est un entier sur 8 octects
pt(0) = 10 //x
pt(1) = 10 //y
pt(2) = 0 //z toujours!
r = 5 //r rayon
// Création d'un l'objet automation dynamique
MonObjetDynamique = allouer un objet automation dynamique "AutoCAD.ApplicationServices"
// Appeler une méthode d'un objet automation dynamique
MonObjetDynamique>>ActiveDocument>>ModelSpace>>AddCircle(pt, r)
Voila je ne sais pas du tout si ça marche et il y a des truc a modifier comme cette déclaration : Dim pt(0 To 2) As Double Mais c'est à tester !
Contribution le : 09/02/2006 14:58
|
|
|
Re: Fichier avec extention TLB |
|
Developpeur WDF ![](http://old.wdforge.org/uploads/rank3e8415c4d95b2.gif)
Inscrit: 21/06/2005 18:17
Post(s): 115
|
Remplace ça :
MonObjetDynamique est un objet automation dynamique
MonObjetDynamique = allouer un objet automation dynamique "AutoCAD.ApplicationServices"
Par :
MonObjetDynamique est un objet Automation ("AutoCAD.ApplicationServices")
Si le test n'est pas concluant !
Contribution le : 09/02/2006 16:33
|
|
|
Re: Fichier avec extention TLB |
|
Anonyme
|
Merci pour c'est info, mais j'y arrive pas. Je comprend pas d'ou vient le probleme. Je recherche toujours.
@+ MDSV31
Contribution le : 16/02/2006 16:42
|
|
Vous ne pouvez pas débuter de nouveaux sujets.
Vous pouvez voir les sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.