---

Hallo ME10 Gemeinde! Ich hab die Bemassung auf Zoll umgestellt. Zwischen den Texten ist leider ein Leerzeichen (Beispiel 0’ – 8''). Kann man dies nicht Voreinstellen das die Leereichen weg sind? (Beispiel 0’-8'')? Kann mir da jemand weiterhelfen??? Grüße Markus

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

---

Fällt keinem was ein? Mir auch nicht.

Das ist eine fixe Vorgabe, ich kenne keine Möglichkeit, da etwas zu verändern.

------------------
. owa ned jedn dog .

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

---

Hallo Markus,

um Zoll-Gewinde zu bemaßen hatte ich mir ein kleines Makro geschrieben um dann entweder horizontal oder vertikal zu Bemaßen.
Alles was mit spi anfängt ist firmenintern und kann auf die schnelle nicht geändert werden. Doch es sollte ein Anreiz sein.

Gruß aus Berlin Gerhard

DEFINE Form_gewinde_bemass_liste
  Me1                            {Menueaufruf}
  IF (Spi_menu_version = 1)
    MENU Spi_menu_col (Spi_string_ausmitten 'Draufs. KÏhlung' 15) 1 3
  ELSE
    MENU Spi_menu_col (Spi_string_ausmitten 'Draufsicht KÏhlung' 21) 1 1
  END_IF
  MENU spi_menu_col ' Bemassung' '' 2 1
  MENU spi_menu_col '          ' '' 2 2
  MENU Spi_menu_col 'zurÏck' 'kuehlung_allgemein' 25 5
  MENU 'G  1/8 ' ' ' 6 1
  MENU 'G  1/4' ' ' 7 1
  MENU 'G  3/8' ' ' 8 1
  MENU 'G  1/2' ' ' 9 1
  MENU 'M 8 x .75 ' ' ' 6 2
  MENU 'M 10 x 1  ' ' ' 7 2
  MENU 'M 14 x 1.5' ' ' 8 2
  MENU 'M 16 x 1.5' ' ' 9 2
  menu 'Es kÎnnen ' '' 11 1
  menu 'nur die Ge' '' 11 2
  menu 'winde bema' '' 12 1
  menu 'Þt werden,' '' 12 2
  menu 'die in die' '' 13 1
  menu 'ser Liste ' '' 13 2
  menu 'vorhanden ' '' 14 1
  menu 'sind      ' '' 14 2
END_DEFINE
{ ***** }
DEFINE form_gewinde_bemassung_vertical
  LOCAL M
  LOCAL P2
  LOCAL P3
  LOCAL P4
  Form_gewinde_bemass_liste
  Farbe_stift                      {aktuelle Farbe und Stift merken}
  IF (Spi_menu_version = 1)
    MENU Spi_menu_col (Spi_string_ausmitten 'Vertik. KÏhlung' 15) 1 3
  ELSE
    MENU Spi_menu_col (Spi_string_ausmitten 'Vertikal KÏhlung' 21) 1 1
  END_IF
  LOOP
    color farbe linepattern Stift
    CATCH ALL
    READ PNT 'BEZUGSPUNKT unten                  = ?' P2
    READ PNT 'BEZUGSPUNKT oben                  = ?' RUBBER_LINE P2 P3
    READ PNT 'BEZUGSPUNKT MaÞpunkt              = ?' RUBBER_LINE P3 P4
    LET M (ABS ((Y_OF P2) - (Y_OF P3)))
    DIM_CURSOR_POSITION TEXT_POS
    LINE CENTER_DASH_DASH Form_stift0 end
    POINT P2 P3
    IF ((M>=9.95) AND (M<=10.05))
      DIM_LINE VERTICAL P2 P3 P4
      EDIT_DIM_TEXT P4 'M10x1'
    ELSE_IF ((M>=26.3) AND (M<=26.55))
      DIM_LINE VERTICAL P2 P3 P4
      EDIT_DIM_TEXT P4 'G 3/4'
    ELSE_IF ((M>=7.95) AND (M<=8.05))
      DIM_TEXT_SIZE 2
      DIM_LINE VERTICAL P2 P3 P4
      EDIT_DIM_TEXT P4 'M8x.75'
    ELSE_IF ((M>=13.95) AND (M<=14.05))
      DIM_LINE VERTICAL P2 P3 P4
      EDIT_DIM_TEXT P4 'M14x1.5'
    ELSE_IF ((M>=15.95) AND (M<=16.05))
      DIM_LINE VERTICAL P2 P3 P4
      EDIT_DIM_TEXT P4 'M16x1.5'
    ELSE_IF ((M>=9.628) AND (M<=9.8))
      DIM_TEXT_SIZE 2
      DIM_LINE VERTICAL P2 P3 P4
      EDIT_DIM_TEXT P4 'G 1/8'
    ELSE_IF ((M>=13.057) AND (M<=13.215))
      DIM_LINE VERTICAL P2 P3 P4
      EDIT_DIM_TEXT P4 'G 1/4'
    ELSE_IF ((M>=16.5) AND (M<=16.8))
      DIM_LINE VERTICAL P2 P3 P4
      EDIT_DIM_TEXT P4 'G 3/8'
    ELSE_IF ((M>=20.855) AND (M<=21.05))
      DIM_LINE VERTICAL P2 P3 P4
      EDIT_DIM_TEXT P4 'G 1/2'
    ELSE
      DISPLAY
      'Es kann sein, daÞ dies kein KÏhlungsgewinde ist, von unten noch einmal versuchen !'
    END_IF
    DIM_CURSOR_POSITION LINE_POS
    DIM_TEXT_SIZE 3
    END
  END_LOOP
END_DEFINE

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

---

Hallo Gerhard,

mit "Bemassung editieren" geht's natürlich - das ist aber i.a. nicht unbedingt sinnvoll, weil ja die Assoziativität verlorengeht.

Dazu gleich noch eine Anregung; in den "neueren" OSDD-Versionen kann man bestehende Bemassungen elegant mit INQ_ELEM / (INQ 306) / (INQ 3) ... abfragen.

Hannes

------------------
. owa ned jedn dog .

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

---

Hallo Hannes,

danke für Deine Nachricht, aber das Problem mit der Assoziativität kommt bei mir nicht vor, denn wenn ich eine 2D-Zeichnung abgeliefert hatte, dann wurden ohne Bohrungen für CAM weiter verwendet.

Jetzt da ich ab 1. Sept. 2006 Rentner bin werde ich nicht mehr viel bezüglich Programmierung machen (Zeitmangel).

Nochmal danke für Deinen Tip und ich werde das auch mal probieren.

Gruß aus Berlin Gerhard

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