Hallo,
ich suche nun schon eine ganze Weile in google und der cad.de Suche aber ich finde nichts. Wo finde ich eine Hilfe für Inventor VBA wo alle Eigenschaften drin stehen die man irgendwo Anwenden kann.
Im Speziellen suche ich wie ich ein Textfeld horizontal und vertikal mittig setzen kann, Schriftgröße habe ich schon gefunden hier im Forum
"<StyleOverride FontSize='" & 0.1 & "'>" & "Text" & "</StyleOverride>"
MfG Thorsten
Edit: Ich habe nun sowas wie eine Makro Recorder Funktion hier im Forum gefunden, kann aber mit dem Ergebnis nicht viel anfangen. Vielleicht weis ja jemand was damit zu machen.
Habe eine Zeichnung geöffnet, ein Text in einer Skizze mit dem String "test" hinzugefügt. Das was ich hier eingefügt habe ist nur die Zeile wo ich den Text hinzugefügt habe.
ActiveDocument.Execute("Document3","AddSketchText","Sketch Text Sketch=Document3.DlDocDCSegment.51914;LayerStyle=Symbol (ISO);EDITED String=NULLREF;Sketch Text LL=[12.562265825952,11.236864514402,0];Sketch Text UR=[13.472006095136,11.586864507801,0];Sketch Text String=test;Sketch Text Font=[ISOCPEUR,0,35,400,0,1];Sketch Text Ref Point=0;Sketch Text Hor Just=0;Sketch Text Ver Just=2;Sketch Text Line Space Type=1;Sketch Text Line Space Value=1.000000;Sketch Text Red=-1.000000;Sketch Text Green=-1.000000;Sketch Text Blue=-1.000000;Sketch Text Origin=[12.562265825952,11.236864514402,0];Sketch Text Rotation=0;Sketch Text Parameters=[];Sketch Text Parameters Precision=[];Sketch Text Parameters Uses Comma=[];Sketch Text Parameters Leading Zero=[];Sketch Text Parameters Trailing Zero=[];Sketch Text Aspect Ratio=1;Sketch Text Has Box Geom=0;Sketch Text Is Fit=0;Sketch Text Is Singleline=0;Sketch Field Text Primary Strings=[];Sketch Field Text Category IDs=[];Sketch Field Text Parameter IDs=[];")
[Diese Nachricht wurde von surfhai am 25. Jul. 2005 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP