---

Hai Leute,
hat jemand eine Idee, wo man eine "Datenbank" erhält (oder hatŽs schon einer programmiert), in welcher die Abmasse für Passungen gelistet sind.
Die Bemassungen mit Passungsattributen (g6, F7 ...) aus einer SWX-Zeichnung auszulesen, in eine Excel-Tabelle einzutragen, zu sortieren und als OLE wieder aufŽs Blatt einzufügen ist - nach Meinung von Programmierern - nicht das Problem. Die Zuweisung der Abmasse, d.h. welches Abmaß bei welchem Durchmesser bei welcher Passung muß aber aus irgendeiner Datenbank geholt werden.
Wenn jemand einen Tip oder eine Lösung hat, wäre der Menschheit sehr geholfen.
Danke und tschüs,

Johannes

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Wüßte ich auch gerne, dass Hauptproblem dabei ist die vermutlich die Produkthaftung, denn wer will schon garantieren, dass die Tabellen alle okay sind. Und wer will's auf der anderen Seite kontrollieren und gegen die "offiziellen" Tabellen vergleichen.

Aber wenn sowas tatsächlich irgendwo schon existiert geben ich den Programmierern Recht, dass müßte sich verhältnismäßig einfach umsetzen lassen. Alle Programme, von denen ich weiss, das die sowas können, sind kostenpflichtig mit verschlüsselten datenbanken dahinter. Die offiziellen Stellen (ich glaub Beuth Verlag wie bei dem Rest der DIN/ISO) halten da auch den Daumen drauf ...

Ciao,
Stefan

------------------
--
Inoffizielle Solidworks Hilfeseite
http://solidworks.cad.de
EMail: Stefan.Berlitz@solidworks.cad.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Abm.txt

Hier sind alle (wenn auch nicht komplett) in der Praxis notwendigen Passungen im ASCII Format mal aufgelistet:

Siehe Anlage

Die Liste liesst sich wie folgt:

U/L Passung, von Mass, bis Mass, unteres Abmass, oberes Abmass

Die Kennung U/L bedeutet Upper (Grossbuchstabe) oder Lower (Kleinbuchstabe).

UR9 ist also die Reihe R9, LR9 wäre demnach r9.

Wir verwenden diese Werte in interCAD zur Erzeugung von Passungstabellen bzw Abmasstabellen und Umschaltung der Darstellung der Bemassung (mit Passung / mit Abmassen). Bis jetzt (seit mehr als 5 Jahren gibt es das schon) hat sich noch niemand über mangelnde Vollständigkeit oder falsche Werte beklagt, die Werte sollten also stimmen.

Vielleicht hilft die Liste ja zur Erstellung eines kleinen SWTOOLS ;-)

[Diese Nachricht wurde von AndreasK am 16. März 2001 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke, dass sollte allen (einschliesslich mir) die sowas in Programmform umsetzen wollen gewaltig weiterhelfen. Mal schauen wann ein neues Programm von SWTools damit herauskommt, ich bin schon dran. :-)

Stefan

------------------
--
Inoffizielle Solidworks Hilfeseite
http://solidworks.cad.de
EMail: Stefan.Berlitz@solidworks.cad.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

wir haben eine Software geschrieben, die Passungen automatisch als Geometrie umsetzt - setzt also das Part / Assembly z.B auf Mittenmass. In absehbarer Zeit wird darin auch die Ausgabe einer Passungstabelle auf der Zeichnung beinhaltet sein.
Download 30 Tage Testversion unter http://www.solidpro.de/html/booster.htm.

Idden und Anregungen gerne an mich!

Lothar Höfle

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Leute,

habe für uns eine Lösung des Problems wie folgt gefunden. Nach Angabe der Bemassung und Auswahl der betreffenden Passungsart werden nach kurzer Zeit die Abmaße aufgelistet. Mit etwas Fantasie kann man es in ein Programm wie dem Schriftfeld Progamm von Stefan Berlitz integrieren. Die Daten die AndreasK hier aufgelistet hat sind in einer Excel Tabelle hinterlegt, diese können auch nachträglich bearbeitet/ergänzt werden.

Private Sub cmdSfAktual1_Click()

Set wkbObj = GetObject("C:\Programme\SolidWorksApp\Schriftfeld\Passungstabelle.xls")

Dim i As Integer
Dim SpalteA As String
Dim SpalteB As Integer
Dim SpalteC As Integer
Dim SpalteD As Single
Dim SpalteE As Single
Dim Index As String
For i = 1 To 5000
Index = False

SpalteA = wkbObj.Worksheets(2).Range("A" & i + 1).Value
SpalteB = wkbObj.Worksheets(2).Range("B" & i + 1).Value
SpalteC = wkbObj.Worksheets(2).Range("C" & i + 1).Value
SpalteD = wkbObj.Worksheets(2).Range("D" & i + 1).Value
SpalteE = wkbObj.Worksheets(2).Range("E" & i + 1).Value

If txtSfPaßmaß1.Text = "" Then
cmbSfPassung1.Text = Empty
txtSfOAb1 = Empty
txtSfUAb1 = Empty
Exit Sub
End If

If cmbSfPassung1.Text = SpalteA And txtSfPaßmaß1.Text > SpalteB And txtSfPaßmaß1.Text <= SpalteC = True Then
txtSfOAb1 = SpalteD
txtSfUAb1 = SpalteE
Index = True
End If

If Index = True Then
Exit Sub
End If

If SpalteA = Empty Then
Exit Sub
End If

Next i

If Index = False Then
MsgBox "Zu " + txtSfPaßmaß1.Text + " " + cmbSfPassung1.Text + " keine Abmaße gefunden"
End If
End Sub

Der oben stehende Programm Code ist nur ein Teil eines Bestehenden Programms und soll nur auf zeigen wie es bei uns funktioniert. Da ich nicht der große Programmierer unter VB bin, kann es durch aus auch sein das es eleganter geht.

Gruß an die Gemeinde
Ralf

P.S. Für Verbesserungsvorschläge wie man es eleganter lösen kann habe ich ein offenes Ohr da man ja nie genug lernen kann.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

für alle, die keine eigene Lösung programmieren wollen,
gibt es eine fertige Lösung.

---Werbung ein
PowerWorks TolTab

PWTolTab erzeugt wahlweise Excel-Tabellen und
"SolidWorks-Tabellen" als Zeichenansicht.
In PWTolTab werden die Passungen übrigens
berechnet. Daher sind auch alle gültigen Passungen
im Nennmaßbereich >1..500 mm vorhanden.

Die Passungstabellen werden beim Speichern einer Zeichnung
automatisch aktualisert.

Die Demoversion gibt's unter
http://www.wpnorm.de
oder http://www.solidteam.de

----Werbung aus

Gruß,
Dieter Bruns

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Tolle Sache das

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Moin,

auch von SOLID LINE gibt es Werkzeug, mit dem die Passungen im Modell umgesetzt und Paßmaßtabellen in Zeichnungen eingefügt werden können. Das Produkt nennt sich TolEdit.

Gruß,
Stefanie Dieterich
SOLID LINE Sales & Support GmbH
Support Norddeutschland

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

in der DPS-Varbox gibt es ein solches Tool, einfach die Passung
an das Maß schreiben, das Tool aufrufen und eine Abmaßtabelle wird
generiert und in die Zeichnung eingefügt. Ich denke das sollte funktionieren.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Passungen.zip

Wem's hilft: ich habe eine Excel-Tabelle mit Passungen angefügt.
(Natürlich ohne Gewähr für die Richtigkeit. Die Tabelle stammt auch nicht von mir, ich bin nur Nutznießer).

[Diese Nachricht wurde von Piet am 22. März 2002 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Passungen.zip

Hallo Leude

Ich habe ein Macro zusammengeschustert aus den Tabellen und den Codefragmenten die hier in diesem Tread reingebracht worden sind. 

Ich gebe keine Gewähr auf richtigkeit der Tabellen in diesem Program.

Es müssen in dem Macro nur noch die Pfadangaben geändert werden.

------------------
Soo Long

Frank O.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP