utilistion de la collection Parameters pour un objet CATIA

Voir le sujet précédent Voir le sujet suivant Aller en bas

utilistion de la collection Parameters pour un objet CATIA

Message par Gladoum le Ven 12 Déc 2014 - 1:51

Bonjour,
en fait je voudrais utiliser la collection parameters du DrawingDocument.
En effet je voudrais crééer des property tels que la couleurs etc propre à un objet que je pourrais stocker dans la collection Parameters.
S'il y'a aussi d'autre moyens de sauvegarder des paramétres sous CATIA n'hésitais pas
SVP s'il y'en a qui ont déjà utiliser la collection dites moi comment en VBA ou C#. merci

Gladoum
timide
timide

Messages : 8
Date d'inscription : 23/10/2014
Localisation : Belfort

Revenir en haut Aller en bas

Re: utilistion de la collection Parameters pour un objet CATIA

Message par Guss_ le Mer 17 Déc 2014 - 3:40

Je n'ai pas très bien saisis ta question.

Je sais que pour ce qui est des propriété couleurs, taille ... ce n'est pas super évident, il faut passer par un objet "selection" et ensuite modifier les paramètres de couleur ... de l'objet "selection", on ne peut le faire directement sur l'objet.

Guss_
Fédérateur
Fédérateur

Messages : 498
Date d'inscription : 08/01/2010

Revenir en haut Aller en bas

Re: utilistion de la collection Parameters pour un objet CATIA

Message par Gladoum le Jeu 18 Déc 2014 - 23:19

Bonjour,
merci d'avoir répondu
oui vous avez raison pour les propriétes couleurs, taille par exemple il faut d'abord l'objet Selection
comme par exemple ici en c#
private Selection objselect;
objselect = CATIA.ActiveDocument.Selection;
objselect.VisProperties.SetRealLineType(2, 1);

mon problème concerne plutôt l'ajout et la recupération de parametres de la collection KnowledgewareTypeLib.Parameters d'un drawingdocument ensuite après les avoir récupérer avoir la possibilté grâce à la "selection" de modifier ces paramétres
si vous voulez des éclaircissements n'hésitez surtout pas je sais que c'est pas du tout évident

Gladoum
timide
timide

Messages : 8
Date d'inscription : 23/10/2014
Localisation : Belfort

Revenir en haut Aller en bas

Re: utilistion de la collection Parameters pour un objet CATIA

Message par xorman le Ven 19 Déc 2014 - 4:56

Bonjour
Ci joint un bout de code qui récupère les textes d'un drawing pour les mettre dans des paramètres CATIA

Code:
Sub RecupCartouche()
'CATInit
Dim DernierIndice As DrawingText
Dim Ind As Integer
If CATCheckRef = 0 Then Exit Sub

'Recupération de la ref CMN
Set strParam1 = parameters1.Item("Drawing\Num_plan")
Form_cartouche_CMN.TextBoxNum_plan.Text = strParam1.Value

'Recupération de l'activité BE
Set strParam3 = parameters3.Item("Drawing\Activite_BE")
Form_cartouche_CMN.ComboBoxUPL.Text = strParam3.Value

'Recupération de la designation
Set strParam4 = parameters4.Item("Drawing\Designation")
Form_cartouche_CMN.TextBoxNomDuModele1.Text = strParam4.Value

'Recupération de la designation 2
Set strParam5 = parameters5.Item("Drawing\Designation2")
Form_cartouche_CMN.TextBoxNomDuModele2.Text = strParam5.Value

'Recupération de l'échelle
Set Texte = DrwTexts.GetItem("Cartouche_Text_echelle")
Form_cartouche_CMN.TextBoxScale = Texte.Text

'Recupération du poids
Set Texte = DrwTexts.GetItem("Cartouche_Text_poids")
Form_cartouche_CMN.TextBoxWeight = Texte.Text

'Recupération du dernier indice
For i = 1 To 4
Set Texte = DrwTexts.GetItem("Cartouche_Text_rev_" & CStr(i) & "_ind")
  If Texte.Text <> "." Then
     Ind = i + 1
     Set DernierIndice = DrwTexts.GetItem("Cartouche_Text_rev_" & CStr(Ind - 1) & "_ind")
     Form_cartouche_CMN.TextBoxRevisonValidation = DernierIndice.Text
     Set DernierIndice = DrwTexts.GetItem("Cartouche_Text_rev_" & CStr(Ind - 1) & "_date")
     Form_cartouche_CMN.TextBoxDateValidation = DernierIndice.Text
     Set DernierIndice = DrwTexts.GetItem("Cartouche_Text_rev_" & CStr(Ind - 1) & "_modif")
     Form_cartouche_CMN.TextBoxModifValidation = DernierIndice.Text
     Set DernierIndice = DrwTexts.GetItem("Cartouche_Text_rev_" & CStr(Ind - 1) & "_designer")
     Form_cartouche_CMN.TextBoxDesignerValidation = DernierIndice.Text
     Set DernierIndice = DrwTexts.GetItem("Cartouche_Text_rev_" & CStr(Ind - 1) & "_rft")
     Form_cartouche_CMN.TextBoxRftValidation = DernierIndice.Text
    
  ElseIf Texte.Text = "." Then
      Exit For
  End If
Next
End Sub
avatar
xorman
actif
actif

Messages : 95
Date d'inscription : 06/09/2008
Age : 41
Localisation : Cherbourg

http://www.myimpression3d.com

Revenir en haut Aller en bas

Re: utilistion de la collection Parameters pour un objet CATIA

Message par Gladoum le Ven 19 Déc 2014 - 19:42

Bonjour Xorman,
merci je vais regarder ça de plus prés et éventuellement le traduire en c# Smile

Gladoum
timide
timide

Messages : 8
Date d'inscription : 23/10/2014
Localisation : Belfort

Revenir en haut Aller en bas

Re: utilistion de la collection Parameters pour un objet CATIA

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Voir le sujet précédent Voir le sujet suivant Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum