|
INVENTOR VBA : Größe des Schriftfeldes und dessen Mitte finden ?
daywa1k3r am 06.07.2006 um 15:16 Uhr (0)
Workaround:Geh mal alle SketchLines aus der Skizze durch. Du wirst zwei finden die sich in dem Positionspunkt von TitleBlock treffen. Über die RangeBox von den beiden Linien bekommst du praktisch die RangeBox von dem TitleBlock. Daraus kannst du leicht die Mitte berechnen.------------------Grüße daywa1k3rFX64 Software Solutions
|
| In das Form INVENTOR VBA wechseln |
|
Inventor VBA : Form im Vordergrund
daywa1k3r am 20.11.2009 um 11:37 Uhr (0)
Ich weiß jetzt nicht wie dein AddIn aufgebaut ist, aber normalerweise wird das ApplicationObject (Inventor Instanz) aus dem addInSiteObject geholt, und damit ist es nur für diese Instanz gültig. Ich habe es gerade getestet und konnte dein Problem nicht nachvollziehen.------------------Grüße IgorFX64 Software Solutions - Inventor Tools
|
| In das Form Inventor VBA wechseln |
|
INVENTOR VBA : Getobject und mehrere Instanzen
RolandW am 05.05.2006 um 09:03 Uhr (0)
Totale Kontrolle hast Du nie. Der User kann auch ein Addin im Inventor beeenden.Ich versuche lieber die Software so anzupasse, dass begangene Fehler behoben werden können Aber im Moment versuche ich in erster Linie mal die Funktion zu gewährleisten. Ich könnte mir später ein Addin vorstellen das aus INV mit meiner Application komuniziert.Grüssle Roland
|
| In das Form INVENTOR VBA wechseln |
|
Inventor VBA : ComponentOccurrence.Visible funktioniert nicht
daywa1k3r am 09.12.2010 um 10:24 Uhr (0)
Hallo Stefan,du hast da sehr viele unnötige (lustige ) Sachen drin... Im Prinzip reicht es:Code:Sub Unsichtbar() Dim oAsm As Inventor.AssemblyDocument Set oAsm = ThisApplication.ActiveDocument oAsm.ComponentDefinition.Occurrences.ItemByName("TaktplatzBG_01:1").Visible = FalseEnd Sub------------------Grüße IgorFX64 Software Solutions - Inventor Tools
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Laufzeitfehler 91
daywa1k3r am 04.03.2008 um 09:43 Uhr (0)
Autsch, die Fehlermeldung stand schon in dem Beitragstitel Also, so wie es aussieht, wird AutoOpen Makro ausgeführt noch bevor ThisApplication.ActiveDocument den Wert hat. Abgesehen davon würde ich dir von AutoMakros abraten. Programmier lieber ein AddIn. Da kannst du dann schon bestimmen wann deine Funktion durchlaufen soll (zuvor oder danach).------------------Grüße IgorFX64 Software Solutions
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : iProperties löschen
daywa1k3r am 04.08.2008 um 11:27 Uhr (0)
Hallo Markus,ich kann da kein Problem sehen. Die benutzerdefinierte Properties kannst du ganz normal über den letzten PropertySet ansprechen.Tipp: Sollte es auch für die nächste Inventor Version laufen (64 Bit), nimm lieber .NET (vorzugsweise C#.NET).Und sonst wäre es nützlich zu wissen, wie du es momentan probierst (Quellcode)...------------------Grüße IgorFX64 Software Solutions - Inventor Tools
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Rechteckige Anordnung
daywa1k3r am 26.02.2008 um 13:42 Uhr (0)
Scheint nicht so. Ich finde in 2008er nur: The RectangularOccurrencePattern object represents a rectangular pattern of assembly occurrences. The RectangularPatternFeature object represents rectangular pattern feature objects.Also entweder Baugruppe oder Bauteil. Mit Skizze finde ich auch nichts.------------------Grüße IgorFX64 Software Solutions
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Plottdatum
daywa1k3r am 19.06.2007 um 15:16 Uhr (0)
Das ist keine VBA sondern Inventor API Hilfedatei, so findest du AutoSave() nicht. In VB heißt das Event OnSave(). Und alle Events findest du wenn du in dem ersten Reiter (Inhalt) unten Autodesk Inventor Object Library den Events Knoten aufklappst.------------------Grüße IgorFX64 Software SolutionsData Management Konferenz 2007 (26. - 27. Juni 2007)
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Unterdrücken von Welds via API (VBA/Ilogic/Dot.Net)
daywa1k3r am 01.02.2012 um 08:40 Uhr (0)
Hallo Frank,Code:Sub TestDeleteWeld() Dim oWeldDef As WeldmentComponentDefinition Set oWeldDef = ThisApplication.ActiveDocument.ComponentDefinition Dim oWeld As Weld For Each oWeld In oWeldDef.Welds oWeld.Delete NextEnd SubMeinst Du sowas?------------------Grüße IgorFX64 Software Solutions - Inventor ToolsFX64 LambdaSpect - Lichtsimulation mit Autodesk Inventor
|
| In das Form Inventor VBA wechseln |
|
INVENTOR VBA : Rand im InventorView
daywa1k3r am 04.05.2006 um 06:38 Uhr (0)
Hallo Reinhard,ich wollte in InventorView öfters was einstellen, aber leider ohne Erfolg. Zudem ist die Komponente meiner Meinung nach die instabilste Komponente von Inventor. Aber leider ist man drauf angewiesen. Sorry. Sollte aber doch was einstellbar sein, sag ruhig Bescheid. ------------------Grüße daywa1k3rFX64 Software Solutions
|
| In das Form INVENTOR VBA wechseln |
|
Inventor VBA : Makros AddSysDateTime funktioniert nicht mehr
daywa1k3r am 16.09.2009 um 09:38 Uhr (0)
Hallo, kommentier mal das "On Error Resume Next" raus, dann siehst du wo dein Programm abstürzt. Einfach blind alle Fehlermeldungen zu ignorieren ist keine gute Lösung. Und sonst: wenn 64Bit dann .NET - mit VBA kommst du da bald gar nicht mehr weiter.------------------Grüße IgorFX64 Software Solutions - Inventor Tools
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Fehler in Programmablauf
daywa1k3r am 04.09.2009 um 12:51 Uhr (0)
Zitat:Original erstellt von conness:Geht das auch im Format .png ?bmp durch png ersetzen und probieren (ich nehme die Spannung weg - Ja es geht) ;) Zitat:Original erstellt von conness:... was ist .netWird bald auch im CAD-Bereich VB(A) ablösen.------------------Grüße IgorFX64 Software Solutions - Inventor Tools
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Form im Vordergrund
daywa1k3r am 25.11.2009 um 13:21 Uhr (0)
Hi Andreas,ja, ist schon mal gut. Was dir noch fehlt ist der Befehl um die Form zu zeichnen (InitializeComponent()). Probier mal das hier:Code:Public Sub New(ByVal objInventorApp As Object) This call is required by the Windows Form Designer. InitializeComponent() oInventorApp = objInventorApp MsgBox(oInventorApp.ActiveDocument.DisplayName.ToString)End Sub ------------------Grüße IgorFX64 Software Solutions - Inventor Tools
|
| In das Form Inventor VBA wechseln |
