Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  Solid Edge
  Drucken eines SE-Dokuments per VB-Anwendung

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 SolidEdge
Autor Thema:  Drucken eines SE-Dokuments per VB-Anwendung (4243 mal gelesen)
Andreas Rauhut
Mitglied
 

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

Beiträge: 5
Registriert: 16.01.2002

erstellt am: 18. Jan. 2002 12:42    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

Hintergrund:
Eine VB-Anwendung soll das jeweils aktive Dokument in SE in eine Datei im TIF-Format drucken.

Dazu überprüft die VB-Anwendung folgendes:
- ist eine DFT Datei geladen
- welches Format hat sie (Größe + Orientierung)
- welche Informationen sind im Schriftfeld eingetragen

Diese Daten, sowie der Ablageort der TIF-Datei, werden dem Drucker-Treiber gesandt (DocuJet Pro 2.0 von Spicer) mitgegeben  und anschließend mittels der Methode Application.Printout "prtname" (keine weiteren Parameter) gedruckt.
Das funktioniert grundsätzlich. Jedoch nimmt SE nicht alle Änderungen in den Druckereinstellungen wahr.
Pfadname und Auflösung werden korrekt genutzt, nur das Format der Zeichnung wird nicht korrekt gewählt.

Die Methode <Printout> macht nicht das, was die Dokumentation verspricht.
Dort steht: "wenn keine Werte explizit an Printout übergeben werden, werden die Werte des Druckertreibers genommen."


Frage:
Wie bewege ich SE ohne einen kompletten Neustart dazu (alle Dokumente entladen und neuladen), die aktuellen Treibereinstellungen auch zu benutzen.

Über jede kleine Info wäre ich dankbar


------------------
Andreas aus KS :)

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

Markus Gras
Moderator
Solid Edge AE


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

Beiträge: 4602
Registriert: 20.07.2000

Kritik muß sachlich falsch und persönlich verletzend sein, damit sie wirkt.

erstellt am: 18. Jan. 2002 17: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 Nur für Andreas Rauhut 10 Unities + Antwort hilfreich

Hallo Andreas,

zu Deiner Frage habe ich jetzt leider keine direkte Antwort.
Damit Du aber nicht denkst hier will Dir keiner helfen, ein Tip
Schau mal im Solid Edge Forum nach.
Es ist leider Englischsprachig aber es gibt einen spezielles Board das sich nur mit Solid Edge Programmierung beschäftigt.
Um Dir den für den Zugang nötigen WEB-Key zu generieren benötigst Du das Solid Edge Lizenzblatt auf dem stehen alle notwendigen Informationen.
Deiner Fragen sind halt sehr speziell und es scheinen sich hier nicht allzuviele Programmierer zu tummeln.

------------------
Gruß

Markus Gras
Unitec Informationssysteme GmbH

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

Andreas Rauhut
Mitglied
 

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

Beiträge: 5
Registriert: 16.01.2002

erstellt am: 18. Jan. 2002 18:12    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

Vielen Dank für den Tip.

Aber von diesem Forum aus bin ich zu web.cad.de gekommen. Dort ist leider auch nicht mehr los. Ich kann nicht verstehen, daß es so wenige Konstrukteure gibt, die in der Programmierung von oft wiederkehrenden Aufgaben in einem CAD-System, Vorteile sehen.
Oder haben diese CAD-Anwender(-Programmierer) nicht den Bedarf, sich auszutauschen?

Als ehemaliger Anwender von PROREN, hatten wir seinerzeit die SE-Entwickler gedrängt, eine vernünftige Programmierschnittstelle zur Verfügung zu stellen.

Nun haben wir eine, - VB ist mehr als seinerzeit FORTRAN - , und es scheint so, als bräuchte sie niemand, obwohl sie jeder bedienen kann.

Denn man kann viele Abläufe in SE mittels VB/VBA automatisieren. CAD wird erst wirklich effizient, wenn Standardkonstruktions- und Informationsaufgaben, programmiert ablaufen können. 

Ich gebe die Hoffnung aber nicht auf, hier noch etwas zu erfahren.

------------------
Andreas aus KS =|:-)

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

Markus Gras
Moderator
Solid Edge AE


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

Beiträge: 4602
Registriert: 20.07.2000

Kritik muß sachlich falsch und persönlich verletzend sein, damit sie wirkt.

erstellt am: 18. Jan. 2002 20:12    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 Andreas Rauhut 10 Unities + Antwort hilfreich

Hallo Andreas,

Du tust sicher gut daran die Hoffnung nicht aufzugeben.
Wir haben hier auch ein Tool das SE Drafts automatisiert als TIFF ausgibt. Das Ding erkennt automatisch Papiergröße und Ausrichtung.
Technisch ist das möglich was Du vorhast, das Tool wurde aber nicht von mir programmiert.
Vielleicht finde ich noch was raus, aber ne Garantie gibts dafür nicht.

------------------
Gruß

Markus Gras
Unitec Informationssysteme GmbH

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

pablo
Mitglied
Techniker


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

Beiträge: 453
Registriert: 23.01.2002

Win10
Office 365
SE 2019

erstellt am: 23. Jan. 2002 12: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 Andreas Rauhut 10 Unities + Antwort hilfreich

"Remarks
These arguments apply only to document objects. When used with a SheetWindow or Window object, PrintOut has no additional arguments."
SolidEdge-SDK PrintoutMethod

Vielleicht hilft folgendes:
set objdft = objapp.ActiveDocument
objDft.PrintOut

PS: Bei meinem Drucker funktioniert beides.

Pablo

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

Andreas Rauhut
Mitglied
 

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

Beiträge: 5
Registriert: 16.01.2002

erstellt am: 23. Jan. 2002 13: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 Pablo,

vielen Dank für die Info. Aber ich nutze die Parameter garnicht.
Grundsätzlich funktioniert der Druck ja auch, aber die vorab im Druckertreiber (TIFF-Erstellung mit DokuJet von Spicer) eingestellten Werte für: Blattgröße, Orientierung, Auflösung und Zielpfad werden von SE nur teilweise genutzt.

Das hat zur Folge, daß eine A0 Zeichnung auf DINA4 gedrängt, oder eine A4 Zeichnung auf DINA0 aufgebläht wird. Beim späteren automatisierten Ausdruck ist das mehr als ärgerlich. 

Es ist als ob SE die Information, daß die Druckereinstellungen geändert wurden, einfach ignoriert. WORD und EXCEL funktionieren auf diese Weise mit PrintOut einwandfrei.


------------------
Andreas aus KS =|:-)

[Diese Nachricht wurde von Andreas Rauhut am 23. Januar 2002 editiert.]

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

kobra
Mitglied


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

Beiträge: 4
Registriert: 27.08.2002

erstellt am: 27. Nov. 2002 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 Andreas Rauhut 10 Unities + Antwort hilfreich

Hallo,
es gibt einen einfachen Trick um Zeichnungen auf den richtigen Drucker zu drucken.

1. Installiere für jedes Blattformat einen TIFF Treiber und ordne diesem Treiber das Blattformat zu.
2. Nun benötigst du noch eine Konfigurationsdatei worin die Blattformate def. sind
z.B. TIFFA4=210x297

3. Über ein VB Programm rufst du folgende Funktion auf:
tifTreiber = "TIFFA4"
drawdoc.PrintOut "" & tifTreiber & "", , , , , 1, "c:\temp\Tifname.tif"

Blattformat aus Zeichnung lesen
    Set Sheet = DrawDoc.ActiveSheet
    sBreite = (Sheet.SheetSetup.SheetWidth)
    sHoehe = (Sheet.SheetSetup.SheetHeight)

------------------
Ihr Solid HitTeam

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

gunni
Mitglied



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

Beiträge: 254
Registriert: 20.08.2000

Fujitsu-Siemens Celsius 460
P4 - 1,7GHZ
1GB RAM
ATI Fire GL2
--------------------
Windows2000 SP4
Solid Edge V16 SP4
--------------------
Solid Edge - Zusatztools:
siritec.com - myNu 4.1
siritec.com - PMTabelle V3.0.0
siritec.com - DraftScale V1.0
siritec.com - MakroToolbar V1.0.0

erstellt am: 02. Dez. 2002 15: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 Andreas Rauhut 10 Unities + Antwort hilfreich

Hallo Andreas,
schaue dir zu folgenden Punkten:

>Dazu überprüft die VB-Anwendung folgendes:
>- ist eine DFT Datei geladen
>- welches Format hat sie (Größe + Orientierung)

mal das nachfolgende Programm an: http://solidedge.cad.de/download/Macros/SE_Plot_Macro_V108.zip

Dass SE beim Drucken über VB nicht das macht was du erwartest muss nicht unbedingt an SE liegen, der Grund kann auch im Zusammenspiel von VB mit WIN NT/2000 liegen. Das mit den Überformaten (A2,A1,A0) ist nämlich bei VB so eine Sache.
Vieleicht hilft dir der nachfolgende Artikel weiter:

Artikel Q157172 "How to create custom forms in Windows NT 4.0 and Windows 2000" auf der Microsoft-Homepage.

Lies auch mal die readme.txt des SE_Plot_Macro_V108 durch.

Noch ein Hinweis, entgegen der VB-Doku haben die selbsterstellten Über-Formate meist eine VB-Konstante die grösser als 256 ist (z.B. 257,258,259,260).

Ich hoffe dir etwas weitergeholfen zu haben.
Grüsse Gunni

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