Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  Inventor
  Textfarbe in pdf übernehmen

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
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
  
Mechatronische Stückliste: Statt des doppelten Lottchens
Autor Thema:  Textfarbe in pdf übernehmen (855 mal gelesen)
Norby1809
Mitglied
TPD


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

Beiträge: 37
Registriert: 05.11.2014

Autodesk Inventor 2023 Core i7 8x3600 MHz, 32 GB DDR4, NVIDIA GeForce GTX 1660 Ti 8Gb, 500GB SD - 2TB HDD, Windows 10

erstellt am: 13. Okt. 2020 14: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

Hallo Zusammen,

dwg & idw Dateien werden bei uns, wie bei den Meisten wohl auch, in pdf umgewandelt. Da ich oft meine Zeichnungen auf mehrer Blätter aufteilen muss, benutze ich den unten stehen Code um alles in einem pdf-Format umzuwandeln. Leider stelle ich immer wieder fest das Texte, die farbig gestaltet sind, in der pdf nur in schwarz angezeigt werden. Auch mit den Inventor internen pdf-Umwandler funktioniert es nicht. Gibt es dazu Abhilfe. Isometrische Ansichten, werden umgewandelt, in der pdf in Farbe angezeigt.

LG Norby

Code:
'------start of iLogic-------

'Obtain info
oPDFAddIn = ThisApplication.ApplicationAddIns.ItemById("{0AC6FD96-2F4D-42CE-8BE0-8AEA580399E4}")
oDocument = ThisApplication.ActiveDocument
oContext = ThisApplication.TransientObjects.CreateTranslationContext
oContext.Type = IOMechanismEnum.kFileBrowseIOMechanism
oOptions = ThisApplication.TransientObjects.CreateNameValueMap
oDataMedium = ThisApplication.TransientObjects.CreateDataMedium

'Options
oOptions.Value("All_Color_AS_Black") = 1
oOptions.Value("Remove_Line_Weights") = 1
oOptions.Value("Vector_Resolution") = 800
oOptions.Value("Sheet_Range") = Inventor.PrintRangeEnum.kPrintAllSheets

'File Path
oPath=ThisDoc.PathAndFileName(False)
oRev = iProperties.Value("Project", "Revision Number")
oDataMedium.FileName = oPath & "" & oRev & ".pdf"

'Publish document
oPDFAddIn.SaveCopyAs(oDocument, oContext, oOptions, oDataMedium)

'------end of iLogic-------


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

Michael Puschner
Moderator
Rentner




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

Beiträge: 13003
Registriert: 29.08.2003

Toshiba Encore mit MS Office

Ein Programm sollte nicht nur Hand und Fuß, sondern auch Herz und Hirn haben.
(Michael Anton)

erstellt am: 13. Okt. 2020 15: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 Norby1809 10 Unities + Antwort hilfreich

Statt
Code:
oOptions.Value("All_Color_AS_Black") = 1

muss es dann wohl
Code:
oOptions.Value("All_Color_AS_Black") = 0

sein.


------------------
Michael Puschner
Autodesk Certified Instructor
Autodesk Inventor Certified Expert
Autodesk Inventor Certified Professional
Mensch und Maschine Scholle GmbH

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

Norby1809
Mitglied
TPD


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

Beiträge: 37
Registriert: 05.11.2014

Autodesk Inventor 2023 Core i7 8x3600 MHz, 32 GB DDR4, NVIDIA GeForce GTX 1660 Ti 8Gb, 500GB SD - 2TB HDD, Windows 10

erstellt am: 14. Okt. 2020 06: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

Jo, das war es. Herzlichen Dank 

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)2024 CAD.de | Impressum | Datenschutz