Hot News aus dem CAD.de-Newsletter:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  Rund um AutoCAD
  Alle Stilnamen auf Schriftart isocp setzen.

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:   Alle Stilnamen auf Schriftart isocp setzen. (3107 mal gelesen)
Ralle
Mitglied



Sehen Sie sich das Profil von Ralle an!   Senden Sie eine Private Message an Ralle  Schreiben Sie einen Gästebucheintrag für Ralle

Beiträge: 266
Registriert: 12.03.2003

Windows 10 Enterprise
64-Bit, 32GB
MEP2018

erstellt am: 13. Okt. 2003 13:56    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo,

bekomme regelmäßig Pläne mit diversen Schriftstilen in der Zeichnung.
Meistens Planköpfe mit Attributen, aber auch normale Texte.
Grundsätzlich setze ich alles auf Standard isocp mit einem Makro.
Sobald ich aber mehrere Schriftstile habe (leider sind es immer wieder verschiedene
Schriftstile) reicht mein Makro nicht mehr. Also muß ich von Hand jedem Schriftstil
die isocp zuweisen. Funktioniert zwar gut, aber geht's auch einfacher? Lisp oder so?

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

Thomas Rausch
Mitglied



Sehen Sie sich das Profil von Thomas Rausch an!   Senden Sie eine Private Message an Thomas Rausch  Schreiben Sie einen Gästebucheintrag für Thomas Rausch

Beiträge: 1199
Registriert: 26.03.2001

Intel P4 2,6 GHz
512 MB RAM
NVIDIA GeForce FX 5200
.
WinXP prof.
Autodesk Map 2004 SP 1
WS-Landcad 2004
.
Tetris

erstellt am: 13. Okt. 2003 14:01    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Hallo,
wäre es dann nicht besser allen Texten (Schnellauswahl) einen Textstil zuzuordnen und nur diesem dann die Schriftart?

------------------

gruß
thomas

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

Brischke
Ehrenmitglied V.I.P. h.c.
CAD on demand GmbH



Sehen Sie sich das Profil von Brischke an!   Senden Sie eine Private Message an Brischke  Schreiben Sie einen Gästebucheintrag für Brischke

Beiträge: 4124
Registriert: 17.05.2001

AutoCAD 20XX, defun-tools

erstellt am: 13. Okt. 2003 14:03    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Hallo Ralle,

wie du das vor hast, ist eine Möglichkeit. Ist es aber nicht sinnvoller alle Textelemente auf einen Schriftstil zu schieben und die Überflüssigen dann zu löschen/bereinigen?

Bei Fragen ...

Grüße Holger

------------------
Holger Brischke
(defun - Lisp over night!
AutoLISP-Programmierung für AutoCAD
NEU: AutoLISP- Projektschulung
NEU: Praxisorientierte Schulungen und Workshops durch die bekannten CAD.de Moderatoren
AutoCAD, AutoCAD LT, AutoCAD Mechanical, Mechanical Desktop, Architectural Desktop

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

Ralle
Mitglied



Sehen Sie sich das Profil von Ralle an!   Senden Sie eine Private Message an Ralle  Schreiben Sie einen Gästebucheintrag für Ralle

Beiträge: 266
Registriert: 12.03.2003

Windows 10 Enterprise
64-Bit, 32GB
MEP2018

erstellt am: 13. Okt. 2003 14:59    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Mit den normalen Texten hab ich ja kein Problem.
Aber wie greife ich die Block-Attribute?
Die kriege ich doch mit der Schnellauswahl nicht,
oder doch?! Habs versucht aber leider nicht hingekriegt.

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

cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 18820
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 13. Okt. 2003 15:13    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

halt dich an Holger´s Tip...
nehme am besten die Standard prüfen" Funktion, damit ist´s schnell erledigt !
Standardvorlage hat nur einen Texstil... beim prüfen alle anderen durch
diesen ersetzen...

------------------
- Sebastian -

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


Ex-Mitglied

erstellt am: 13. Okt. 2003 15:23    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat

Ich benutze folgendes Makro:

    For i = 0 To ThisDrawing.TextStyles.Count - 1
        ThisDrawing.TextStyles.Item(i).fontFile = "simplex.shx"
        ThisDrawing.TextStyles.Item(i).BigFontFile = "bf_txt8.shx"
    Next i

Er geht alle Textstile durch und setzt ihn bei uns auf Simplex. Des weiteren (was bei dir nicht notwendig ist) aktiviert das Makro den Bigfont.

Viel Spaß dabei.
Jürgen

Ralle
Mitglied



Sehen Sie sich das Profil von Ralle an!   Senden Sie eine Private Message an Ralle  Schreiben Sie einen Gästebucheintrag für Ralle

Beiträge: 266
Registriert: 12.03.2003

Windows 10 Enterprise
64-Bit, 32GB
MEP2018

erstellt am: 13. Okt. 2003 15:24    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Werds versuchen mit Standards prüfen. Dank an alle

Gruß Ralph

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

Ralle
Mitglied



Sehen Sie sich das Profil von Ralle an!   Senden Sie eine Private Message an Ralle  Schreiben Sie einen Gästebucheintrag für Ralle

Beiträge: 266
Registriert: 12.03.2003

Windows 10 Enterprise
64-Bit, 32GB
MEP2018

erstellt am: 13. Okt. 2003 15:26    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Ui dir natürlich auch danke Jürgen für das Makro.

Tschü

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

AsSchu
Ehrenmitglied
Konstrukteur


Sehen Sie sich das Profil von AsSchu an!   Senden Sie eine Private Message an AsSchu  Schreiben Sie einen Gästebucheintrag für AsSchu

Beiträge: 1632
Registriert: 27.06.2003

ACAD 2012

erstellt am: 13. Okt. 2003 16:07    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Hallo,

Nachtrag: für unbekannte Fonts stelle ich die SYSVAR "FONTALT" auf "meinen" Schriftstil.

Ciao

------------------

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

Karsten.G
Mitglied



Sehen Sie sich das Profil von Karsten.G an!   Senden Sie eine Private Message an Karsten.G  Schreiben Sie einen Gästebucheintrag für Karsten.G

Beiträge: 190
Registriert: 21.06.2002

Verwendetes System:
PIII 700 MHz; 512 MB-RAM;
Windows NT 4.0;<p>AutoCAD 2000 + pit-cup 5.2

erstellt am: 15. Okt. 2003 14:52    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Hi, ich würde gerne noch mal auf die Ursprungsfrage zurückkommen !

"Gehts mit LISP oder SO ???"

Ich bräuchte nämlich auch so ein Tool.

Wir müssen nämlich immer die Textstile der Architekten umstellen, da diese immer anders heißen, wäre ein kleines Prog, welche alle Stilname ändert sehr hilfreich.

Mir ists egal, ob der Architekt 10 oder 20 Stilnamen hat. Ich muss sie nur schnellstmöglichst umstellen.


------------------
Gruß Karsten


------------------

Ihre Fachzeitschriften fliegen überall rum und wenn Sie sie suchen, sind sie nicht zu finden ???
Schluss damit !!!
In einem schönen Buch herrscht Ordnung und sie sind stets griffbereit !
Fragen Sie uns:  http://www.buchbinderei-gibietz.de

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

Ralle
Mitglied



Sehen Sie sich das Profil von Ralle an!   Senden Sie eine Private Message an Ralle  Schreiben Sie einen Gästebucheintrag für Ralle

Beiträge: 266
Registriert: 12.03.2003

Windows 10 Enterprise
64-Bit, 32GB
MEP2018

erstellt am: 15. Okt. 2003 15:21    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo,
mit CAD Standard funktionierts wunderbar und schnell.
Verstehe deshalb nicht warum du für eine Funktion die dir
ACAD liefert ein lisp brauchst.
Übrigens mit mum CADconv kannst auch stapelmäßig abarbeiten lassen.

gruß Ralle

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

Karsten.G
Mitglied



Sehen Sie sich das Profil von Karsten.G an!   Senden Sie eine Private Message an Karsten.G  Schreiben Sie einen Gästebucheintrag für Karsten.G

Beiträge: 190
Registriert: 21.06.2002

Verwendetes System:
PIII 700 MHz; 512 MB-RAM;
Windows NT 4.0;<p>AutoCAD 2000 + pit-cup 5.2

erstellt am: 15. Okt. 2003 15:29    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Was ist das besagte "CAD Standards" ????

Wo finde ich die "Standards prüfen-Funktion", von der oben die Rede ist ?

Irgendwie raff ichs gerade net so.

Kannste mir ein bischen auf dei Sprünge helfen?

------------------
Gruß Karsten


------------------

Ihre Fachzeitschriften fliegen überall rum und wenn Sie sie suchen, sind sie nicht zu finden ???
Schluss damit !!!
In einem schönen Buch herrscht Ordnung und sie sind stets griffbereit !
Fragen Sie uns:  http://www.buchbinderei-gibietz.de

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

Karsten.G
Mitglied



Sehen Sie sich das Profil von Karsten.G an!   Senden Sie eine Private Message an Karsten.G  Schreiben Sie einen Gästebucheintrag für Karsten.G

Beiträge: 190
Registriert: 21.06.2002

Verwendetes System:
PIII 700 MHz; 512 MB-RAM;
Windows NT 4.0;<p>AutoCAD 2000 + pit-cup 5.2

erstellt am: 15. Okt. 2003 15:33    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Ich hab übrigens ACAD2000 !

Hab keine Ahnung, warum das neuerdings nicht mehr links angezeigt wird.

Ich habs doch eingegeben und hat auch immer gefunzt 

------------------
Gruß Karsten


------------------

Ihre Fachzeitschriften fliegen überall rum und wenn Sie sie suchen, sind sie nicht zu finden ???
Schluss damit !!!
In einem schönen Buch herrscht Ordnung und sie sind stets griffbereit !
Fragen Sie uns:  http://www.buchbinderei-gibietz.de

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

Ralle
Mitglied



Sehen Sie sich das Profil von Ralle an!   Senden Sie eine Private Message an Ralle  Schreiben Sie einen Gästebucheintrag für Ralle

Beiträge: 266
Registriert: 12.03.2003

Windows 10 Enterprise
64-Bit, 32GB
MEP2018

erstellt am: 15. Okt. 2003 15:37    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Servus,

CAD-Standards gibt erst ab ACAD2004.

Viel Glück bei der weiteren Suche.

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

Ralle
Mitglied



Sehen Sie sich das Profil von Ralle an!   Senden Sie eine Private Message an Ralle  Schreiben Sie einen Gästebucheintrag für Ralle

Beiträge: 266
Registriert: 12.03.2003

Windows 10 Enterprise
64-Bit, 32GB
MEP2018

erstellt am: 15. Okt. 2003 15:40    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Ähem, glaube ich jedenfalls.
Habs früher nie gebraucht :-)

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

Karsten.G
Mitglied



Sehen Sie sich das Profil von Karsten.G an!   Senden Sie eine Private Message an Karsten.G  Schreiben Sie einen Gästebucheintrag für Karsten.G

Beiträge: 190
Registriert: 21.06.2002

Verwendetes System:
PIII 700 MHz; 512 MB-RAM;
Windows NT 4.0;<p>AutoCAD 2000 + pit-cup 5.2

erstellt am: 15. Okt. 2003 15:41    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Jooooo, also wieder mal das Problem mit dieser sch.... Version !

Aber danke.

Also bräuchte ich doch ein Prog !!!

------------------
Gruß Karsten


------------------

Ihre Fachzeitschriften fliegen überall rum und wenn Sie sie suchen, sind sie nicht zu finden ???
Schluss damit !!!
In einem schönen Buch herrscht Ordnung und sie sind stets griffbereit !
Fragen Sie uns:  http://www.buchbinderei-gibietz.de

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

Peter Heuser
Mitglied



Sehen Sie sich das Profil von Peter Heuser an!   Senden Sie eine Private Message an Peter Heuser  Schreiben Sie einen Gästebucheintrag für Peter Heuser

Beiträge: 68
Registriert: 19.02.2002

erstellt am: 15. Okt. 2003 22:58    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich


AS2isocp.zip

 
Hallo.
Mit dem lisp sollte es klappen.
Gruss
Peter

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

Karsten.G
Mitglied



Sehen Sie sich das Profil von Karsten.G an!   Senden Sie eine Private Message an Karsten.G  Schreiben Sie einen Gästebucheintrag für Karsten.G

Beiträge: 190
Registriert: 21.06.2002

Verwendetes System:
PIII 700 MHz; 512 MB-RAM;
Windows NT 4.0;<p>AutoCAD 2000 + pit-cup 5.2

erstellt am: 16. Okt. 2003 09:01    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Hi Peter,

genau so was hab ich gesucht, VIELEN DANK !!!
Die Unities sind unterwegs !

------------------
Gruß Karsten


------------------

Ihre Fachzeitschriften fliegen überall rum und wenn Sie sie suchen, sind sie nicht zu finden ???
Schluss damit !!!
In einem schönen Buch herrscht Ordnung und sie sind stets griffbereit !
Fragen Sie uns:  http://www.buchbinderei-gibietz.de

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

s.wickel
Mitglied
Bauingenieur Wasserwirtschaft


Sehen Sie sich das Profil von s.wickel an!   Senden Sie eine Private Message an s.wickel  Schreiben Sie einen Gästebucheintrag für s.wickel

Beiträge: 421
Registriert: 17.12.2001

erstellt am: 07. Nov. 2003 11:53    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Hallo Peter,

schönes Programm, Klasse!
Kennst du vielleicht ein Programm wie den Layermanager aus den Expresstools, mit dem man einen Status abspeichern kann?

------------------
Nodda,

Stefan 

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

StephanJP
Mitglied
CAD-Admin


Sehen Sie sich das Profil von StephanJP an!   Senden Sie eine Private Message an StephanJP  Schreiben Sie einen Gästebucheintrag für StephanJP

Beiträge: 785
Registriert: 09.11.2000

AutoCAD ,MAP 3D, Civil 3D, P&ID, VehicleTracking alles bis 2017, WS-Plateia, BBSoft,Win 7 Prof, Canon PlotClient
Canon IPF 605, 825

erstellt am: 07. Nov. 2003 11:57    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Hallo Stefan,

einfach die Vorgabedatei als Standard-Datei (*.dws) speichern, dann kann man mit Standardüberprüfung die Texte und auch Layer anpassen.

------------------

gruß
Stephan

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

cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 18820
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 07. Nov. 2003 11:58    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

1. = ACAD-Standard´s

und

2. Status speichern

ist in ACAD2002 enthalten - viel Spaß beim suchen !

bin ja nicht so:


Status.. ist im Layereigenschaftsmanager-Dialog

Standards = _Standards /  _CheckStandards

aber die Hilfe würde dir auch Auskunft geben ..grübel...

------------------
- Sebastian Mattis - Weitere Info´s unter F1 !

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

fuchsi
Mitglied
Programmierer c#.net Datawarehouse


Sehen Sie sich das Profil von fuchsi an!   Senden Sie eine Private Message an fuchsi  Schreiben Sie einen Gästebucheintrag für fuchsi

Beiträge: 1201
Registriert: 14.10.2003

AutoCad Version 2012 deu/enu
<P>Windows 7 64bit

erstellt am: 07. Nov. 2003 12:06    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

(setq st (tblnext "STYLE" t))
(while st
    (setq edate (entget (tblobjname "STYLE" (cdr (assoc 2 st)))))
    (setq edate (subst (cons 3 "ISOCP") (assoc 3 edate) edate))
    (entmod edate)
    (setq st (tblnext "STYLE"))
)

------------------
***********************************************
AutoCad 2000i, 2002, 2004 deutsch und englisch
Windows 2000, NT, XP

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

cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 18820
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 07. Nov. 2003 12:09    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

?  (nicht mehr nötig, aber wesentlich besser  )

------------------
- Sebastian Mattis - Weitere Info´s unter F1 !

[Diese Nachricht wurde von cadffm am 07. November 2003 editiert.]

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

fuchsi
Mitglied
Programmierer c#.net Datawarehouse


Sehen Sie sich das Profil von fuchsi an!   Senden Sie eine Private Message an fuchsi  Schreiben Sie einen Gästebucheintrag für fuchsi

Beiträge: 1201
Registriert: 14.10.2003

AutoCad Version 2012 deu/enu
<P>Windows 7 64bit

erstellt am: 07. Nov. 2003 12:13    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

warum ??

es wurde doch was gesucht, um allen textstilen isocp zuzuweisen
und mein kleines lisp tut genau das

------------------
***********************************************
AutoCad 2000i, 2002, 2004 deutsch und englisch
Windows 2000, NT, XP

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

s.wickel
Mitglied
Bauingenieur Wasserwirtschaft


Sehen Sie sich das Profil von s.wickel an!   Senden Sie eine Private Message an s.wickel  Schreiben Sie einen Gästebucheintrag für s.wickel

Beiträge: 421
Registriert: 17.12.2001

erstellt am: 07. Nov. 2003 12:16    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Hallo cadffm!

Ich suchte nicht den Layermanager oder den Layerstatus sondern so etwas wie den Layermanager, aber für Textstileinstellungen.

Die Arbeit mit TTF-Schriften ist ja bekanntermaßen problematisch, deshalb ersetzen wir die Schriften durch SHX-Schriften. Die Auftraggeber wollen aber oft ARIAL und alle Stile vor dem Plotten von Hand umzustellen ist doch recht aufwändig.

------------------
Nodda,

Stefan 

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

cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 18820
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 07. Nov. 2003 12:22    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

@Fuchsi --> da hängt doch schon´nen Lisp !

@Nodda --> Standard´s macht es doch.
( sorry- das mit "Textmanager" wie Layermanager aus ET habe ich
nicht gerafft gehabt )

Aber dennoch (mit Standards möglich) würde ich alle Stile
(außer "Standard" und den gewünschten "isocp") löschen !
Ein Textstil "Arial" mit zugeordneter Schriftart isocp.shx ist
totaler Mist !

------------------
- Sebastian Mattis - Weitere Info´s unter F1 !

[Diese Nachricht wurde von cadffm am 07. November 2003 editiert.]

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

s.wickel
Mitglied
Bauingenieur Wasserwirtschaft


Sehen Sie sich das Profil von s.wickel an!   Senden Sie eine Private Message an s.wickel  Schreiben Sie einen Gästebucheintrag für s.wickel

Beiträge: 421
Registriert: 17.12.2001

erstellt am: 07. Nov. 2003 12:37    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

@cadffm

Das Problem ist: die Stile sollen sich ja weiter unterscheiden und bestehen bleiben. Sie sollen vor der Weitergebe der Zeichnung auch wieder richtig eingestellt werden. Aber für die Arbeit mit der Zeichnung ist es besser mit SHX-Schriften zu arbeiten (das Problem wurde schon ausführlich im Forum diskutiert). Deshalb habe ich ja sogar mal die Schrift arialshx.shx konstruiert (->CADWIESEL).

Mit den Standarts habe ich noch nicht gearbeitet. Aber ich habe den Eindruck das wäre wie mit dem Trecker auf der Autobahn zu fahren.

------------------
Nodda,

Stefan 

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

cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 18820
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 07. Nov. 2003 12:40    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

der Umgang will gelernt sein und zudem kann man es ja "zurück-speichern" - mit einer anderen (ursprünglichen) Vorlagendatei.

zugegeben: macht nur bei großen Objekten wirklich Sinn...

Über TT-Fonts und deine Arial.shx kenne ich mich schon aus..

------------------
- Sebastian Mattis - Weitere Info´s unter F1 !

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

eilovliz
Mitglied
Technischer Zeichner


Sehen Sie sich das Profil von eilovliz an!   Senden Sie eine Private Message an eilovliz  Schreiben Sie einen Gästebucheintrag für eilovliz

Beiträge: 48
Registriert: 24.06.2004

erstellt am: 23. Jul. 2008 16:10    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Hallo!

Nachdem der Link nicht mehr funktioniert wollte ich fragen
ob mir jemand dieses File "AS2isocp.zip" zukommen lassen kann??
(oder nochmal als anhang draufstellen bräuchte es dringend.

Vielen dank schonmal

MFG eilovliz

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

CADmium
Moderator
Maschinenbaukonstrukteur




Sehen Sie sich das Profil von CADmium an!   Senden Sie eine Private Message an CADmium  Schreiben Sie einen Gästebucheintrag für CADmium

Beiträge: 13399
Registriert: 30.11.2003

Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.

erstellt am: 23. Jul. 2008 16:19    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

naja ... neu geschrieben ist schneller als gesucht. Für sinnvoll halte ich es aber nicht.

Bitteschön:
(defun C:TEXTSTYLE2FONT(  /  BLOCK TS LISTE STYLE)
   (vl-load-com)
   (if (findfile "isocp.shx")
     (progn
       (vlax-for ITEM (vla-get-textstyles
                         (vla-get-activedocument(vlax-get-acad-object))
                      )    
          (vl-catch-all-error-p
            (vl-catch-all-apply
              'vla-put-BigFontFile (list ITEM "")        
            )
          )
          (vl-catch-all-error-p
            (vl-catch-all-apply
              'vla-put-FontFile (list ITEM "isocp.shx")        
            )
          )
       )
       (vla-regen(vla-get-activedocument (vlax-get-acad-object)) acAllViewports)
     )
   ) 
)


------------------
      - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

eilovliz
Mitglied
Technischer Zeichner


Sehen Sie sich das Profil von eilovliz an!   Senden Sie eine Private Message an eilovliz  Schreiben Sie einen Gästebucheintrag für eilovliz

Beiträge: 48
Registriert: 24.06.2004

erstellt am: 23. Jul. 2008 16:28    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

vielen herzlichen dank

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

Lothar1972
Mitglied
Haustechniker

Sehen Sie sich das Profil von Lothar1972 an!   Senden Sie eine Private Message an Lothar1972  Schreiben Sie einen Gästebucheintrag für Lothar1972

Beiträge: 6
Registriert: 25.01.2019

erstellt am: 27. Jan. 2019 15:52    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

ACHTUNG! Sie antworten auf einen Beitrag der älter als 1 Jahr ist!


Zitat:
Original erstellt von Peter Heuser:
Hallo.
Mit dem lisp sollte es klappen.
Gruss
Peter

Hallo Kollegen!
Der Link funktioniert nach 15 Jahren leider nicht mehr, hat das LISP vielleicht noch jemand herumliegen ;-)?

Danke!

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

CADmium
Moderator
Maschinenbaukonstrukteur




Sehen Sie sich das Profil von CADmium an!   Senden Sie eine Private Message an CADmium  Schreiben Sie einen Gästebucheintrag für CADmium

Beiträge: 13399
Registriert: 30.11.2003

Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.

erstellt am: 28. Jan. 2019 07:26    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Zitat:
Original erstellt von Lothar1972:
ACHTUNG! Sie antworten auf einen Beitrag der älter als 1 Jahr ist!


Hallo Kollegen!
Der Link funktioniert nach 15 Jahren leider nicht mehr, hat das LISP vielleicht noch jemand herumliegen ;-)?

Danke!



Nimm doch das von <<hier>> 

------------------
Also ich finde Unities gut ... und andere sicher auch
---------------------------------------
  - Thomas -          
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

Lothar1972
Mitglied
Haustechniker

Sehen Sie sich das Profil von Lothar1972 an!   Senden Sie eine Private Message an Lothar1972  Schreiben Sie einen Gästebucheintrag für Lothar1972

Beiträge: 6
Registriert: 25.01.2019

erstellt am: 28. Jan. 2019 07:32    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Zitat:
Original erstellt von CADmium:

Nimm doch das von <<hier>>  



Guten Morgen und Danke!!
Ich soweit ich das verstehe ändert das "nur" den Textstil, aber wenn im fremden Plan im M-Text die Schriftart manuell eingestellt wurde hilft das nix, oder?
Ich dachte das "alte" Lisp kann da vielleicht helfen?

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

CADmium
Moderator
Maschinenbaukonstrukteur




Sehen Sie sich das Profil von CADmium an!   Senden Sie eine Private Message an CADmium  Schreiben Sie einen Gästebucheintrag für CADmium

Beiträge: 13399
Registriert: 30.11.2003

Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.

erstellt am: 28. Jan. 2019 07:45    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Zitat:
Original erstellt von Lothar1972:

Guten Morgen und Danke!!
Ich soweit ich das verstehe ändert das "nur" den Textstil, aber wenn im fremden Plan im M-Text die Schriftart manuell eingestellt wurde hilft das nix, oder?
Ich dachte das "alte" Lisp kann da vielleicht helfen?


Sicherlich nicht!  ... dafür brauchst du sowas wie STRIPMTEXT ( mal nach suchen ) bzw. einen ähnlichen Codeschnipsel ..

------------------
Also ich finde Unities gut ... und andere sicher auch
---------------------------------------
  - Thomas -          
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

Lothar1972
Mitglied
Haustechniker

Sehen Sie sich das Profil von Lothar1972 an!   Senden Sie eine Private Message an Lothar1972  Schreiben Sie einen Gästebucheintrag für Lothar1972

Beiträge: 6
Registriert: 25.01.2019

erstellt am: 28. Jan. 2019 08:14    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ralle 10 Unities + Antwort hilfreich

Zitat:
Original erstellt von CADmium:

Sicherlich nicht!  ... dafür brauchst du sowas wie STRIPMTEXT ( mal nach suchen ) bzw. einen ähnlichen Codeschnipsel ..


Perfekt, danke!
Du bist heute mein Held des Tages  !

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2019 CAD.de | Impressum | Datenschutz