 |
Solid Edge : Kontaktfedern
pablo am 13.11.2015 um 15:13 Uhr (1)
Zitat:Original erstellt von Fylson:Ich würde auch auf den eliptischen Faktor verzichten , im Prinzip ist es ja einfach nur ne feder im Kreis gebogen und an den Enden verschweißt. Blos wie modellieren :/Mit einer Eigenpunktkurve und einem Muster kommt man der Sache recht nahe. Im Blatt KPC der beigelegten Excel-Datei sind die Punkte der Kurve berechnet.pablo------------------PST = Parametersteuerung für Solid EdgeTB Haberl
|
| In das Form Solid Edge wechseln |
|
VBasic : irgendeine Zeile auslesen
pablo am 08.09.2003 um 20:59 Uhr (0)
Hallo san, Private Sub Command1_Click() Dim s() As String Dim Count As Long, i As Long Datei öfnen Open D:Test.txt For Input As 1 Text in Array lesen Do While Not EOF(1) Count = Count + 1 ReDim Preserve s(Count) Line Input #1, s(Count) Loop Zufallsgenerator initialisieren Randomize Zufallszahl ermitteln i = Int(Rnd * (Count + 1)) MsgBox s(i) Close 1 End Sub HTH pablo
|
| In das Form VBasic wechseln |
|
VBasic : Zeile von VB umschreiben?!
pablo am 07.05.2004 um 16:51 Uhr (0)
Hallo feyza, - du hast das Alias "ShellExecuteA" weggelassen, das mag er nicht. - der Pfad einer Filelistbox ist bei Laufwerken D:, bei Ordnern D:Ordner, wenn deine Datei z.B. direkt in D: liegt, hast du einen Backslash zuviel. dim s as string if right(filDateiAuswahl.Path,1)= "" then s= filDateiAuswahl.Path & filDateiAuswahl.FileName else s=filDateiAuswahl.Path & "" & filDateiAuswahl.FileName end if pablo
|
| In das Form VBasic wechseln |
|
VBasic : Datei kopieren
pablo am 04.08.2004 um 21:13 Uhr (0)
Hallo Feyza, du hast das FileCopy im Programm direkt hinter ein Exit Sub gesetzt, wenn du ein Else vor kopieren einfügst und bei strCom01 = filDateiAuswahl.Path ein & "" hinzufügst, sollte es klappen. HTH pablo
|
| In das Form VBasic wechseln |
|
VBasic : txt Datei ändern und speichern
pablo am 14.12.2005 um 02:31 Uhr (0)
wachsames Holzauge IIPublic Sub ReplacePos(sFileName As String)sFileName = Name der DateiDim FNr As Long, sInclPos As String, s As String Datei öffnen FNr = FreeFile Open sFileName For Input As FNr Do While Not EOF(FNr) Line Input #FNr, s gelesene Zeile ersetzen und in String schreiben sInclPos = sInclPos & Replace(s, "zahlen", "POS-zahlen") & vbCrLf Loop Close FNr String in neue Datei schreiben FNr = FreeFile Open Left(sFileName, Len(sFileName) - 4) & "_Pos.txt" _ For Output As FNr Print #FNr, Lef ...
|
| In das Form VBasic wechseln |
|
Excel : Makro zuweisen.
pablo am 13.01.2004 um 10:36 Uhr (0)
Hallo Dieter, geh in den Visual Basic Editor, klicke mit der rechten Maustaste auf deine Arbeitsmappe und wähle Datei importieren. Damit kannst du eine *.bas Datei laden und hast alle Funktionen und Prozeduren zur Verfügung. HTH pablo
|
| In das Form Excel wechseln |
|
Solid Edge : Als Bild speichern... --> Fehlermeldung
pablo am 16.06.2003 um 15:39 Uhr (0)
Hallo Tommes01, die Einstellung der Auflöung wird nicht berücksichtigt, nur die Bildgrösse ist entscheidend. Bmp und tif benötigen bei 16,7 Mio Farben (24bits/Pixel)pro Pixel 3 Bytes, bei deiner Bildgröße entspricht das 36 MB, jpg ist wesentlich kleiner, weil nicht jedes Pixel extra abgespeichert wird. Für den Speicherbedarf in Solid Edge beim Erzeugen spielt das meines Wissens keine Rolle. Solid Edge verbraucht beim Einrichten großer Assemblies sehr viel Speicherbedarf, ich habe mir daher folgende Vorgang ...
|
| In das Form Solid Edge wechseln |
|
Solid Edge : 2 Parts mit einer Exel-VBA-Datei
pablo am 04.09.2003 um 21:41 Uhr (0)
hallo pepe2003, ich sende dir ein Beispiel im Anhang. HTH pablo
|
| In das Form Solid Edge wechseln |
|
Solid Edge : 2 Parts mit einer Exel-VBA-Datei
pablo am 09.09.2003 um 18:52 Uhr (0)
Lemurian, Alle Verknüpfungen aktualisieren kannst du mit SEApp.StartCommand( 33068 ), aber für Verknüpfungen von untergeordneten Parts zu einer Excel-Datei hilft das nichts. Eine SolidEdge-interne Verknüpfung mit Peer-Variablen ist IMHO das einfachste. pablo
|
| In das Form Solid Edge wechseln |
|
Solid Edge : HITTeam V2.90 für SolidEdge V15
pablo am 14.02.2004 um 14:49 Uhr (0)
Hallo modeng, meines Wissens wird beim Speichern von Änderungen der Stücklistenvorlage in der Draft-Umgebung die Datei DraftList.txt im Ordner Solid Edge V14ProgramTemplateReports geändert. Ich habe noch keine Möglichkeit gefunden, diese Datei im Netzwerk anzusprechen (wie Bohrdurchmesser, Eigenschafts-Seed etc. seit V12 oder 14). Wie geht ihr dabei vor, wenn C:Programme schreibgeschützt ist? pablo
|
| In das Form Solid Edge wechseln |
|
Solid Edge : Exceldokument mit VB anhängen
pablo am 24.02.2004 um 17:27 Uhr (0)
Hallo BJ, was meinst du mit anhängen, in die Arbeitsmappe einfügen oder als Objekt aus Datei erstellen. Für Variante 2 war einmal etwas in der programming newsgroup, für 1 wenn du etwas entdeckst, bitte lass es mich wissen. pablo
|
| In das Form Solid Edge wechseln |
|
Solid Edge : Masse berechnen
pablo am 03.02.2010 um 09:50 Uhr (0)
Thomas,ich habe meine normal.par so geändert:- ein Formelement einzeichnen- Physikalische Eigenschaften öffnen- Checkbox Benutzer.Eigenschaften einschalten- Masse 2,7 kg und Volumen 0,001 m3 eintragen- die 3 Haken für Symbolanzeige entfernen- mit OK bestätigen- Formelement löschen- Datei speichernWenn ich jetzt in einer neuen Zeichnung die Physikalischen Eigenschaften öffne, brauche ich nur die Benutzer.Eigenschaften ausschalten und auf Aktualisieren klicken, dann bin ich bei einem Alu-Teil schon fertig. E ...
|
| In das Form Solid Edge wechseln |
|
Solid Edge : PDF oder JPG als SaveAs möglich?
pablo am 23.07.2011 um 11:43 Uhr (0)
Peticeo,mit SaveAs(E:Test.pdf) lasst sich die Datei als PDF speichern, die restlichen Parameter der Methode sind Not currently supported.Bessere Resultate (und Einstellungsmöglichkeiten) erhältst du mit einem PDF-Printer (z.B. PDF Creator) und der Printout-Methode des jeweiligen Dokuments.Jpg o.ä. (.bmp, .tif, .wrl) lassen sich mit der Methode SaveAsImage des aktiven Views (3D) oder SheetWindows (2D) erzeugen.pablo[Diese Nachricht wurde von pablo am 23. Jul. 2011 editiert.]
|
| In das Form Solid Edge wechseln |
