Juergens-Workshops.de Forum
automatisierte Skripten - Druckversion

+- Juergens-Workshops.de Forum (https://forum.juergens-workshops.de)
+-- Forum: Corel Grafik Forum (https://forum.juergens-workshops.de/forumdisplay.php?fid=65)
+--- Forum: Corel Draw (https://forum.juergens-workshops.de/forumdisplay.php?fid=93)
+--- Thema: automatisierte Skripten (/showthread.php?tid=28354)



automatisierte Skripten - hatschepsut - 04.04.2009

Hallo!


...und gleich die nächste Frage...:oops:


Ich muß einen ganzen Haufen großer eps-Dateien mit CorelDraw X4 bearbeiten. Dabei müssen folgende Schritte durchgeführt werden:

1.) eps-file importieren
2.) ganze Grafik um 90° gegen den Uhrzeigersinn drehen
3.) Höhe auf 150 mm verkleinern
4.) Strichstärken auf 0.5 mm setzen
5.) Farbstile einlesen (ohne ähnliche Farben zu verknüpfen)
6.) alle gefundenen Farben in einem bestimmten Muster umstellen (also z.B. ein irgendwie gearteter Rot-Ton muß auf das reine Rot aus dem Farbstil-Menu umgestellt werden)
7.) alle Buchstaben von einer Umrandung befreien und auf eine bestimmte Schriftart und Größe umstellen

Da der mir zur Verfügung stehende PC leider nicht mehr der neueste ist (Firma will aber keinen schnelleren zur Verfügung stellen), braucht aber insbesondere die Sache mit den Farbstilen und den Farbänderungen teilweise sehr lange, da bis zu 20000 Objekte jongliert werden müssen. Gleichzeitig kann der PC aufgrund der Kapazitätsauslastung nur noch sehr eingeschränkt für Textarbeiten etc. verwendet werden.

Aus diesem Grund geht diese Arbeit nur sehr langsam voran und bremst auch noch die anderen Tätigkeiten aus. Ein Vorschlag eines Bekannten war nun, daß man in CorelDraw ein Skript schreiben könnte, welches diese immerwiederkehrenden Arbeiten an den eps-files dann z.B. in der Mittagspause oder über Nacht selbständig ausführen könnte.:sei_gepriesen:

Leider habe ich im Netz über diesen Punkt nicht sehr viel gefunden, und das CorelDrawX4 Handbuch wurde vom letzten Benutzer/Ratsuchenden nicht in unser Software-Archiv zurückgestellt, so daß ich also auch da nicht nachschauen kann.:beleidigt:


Kennt sich jemand mit dem Erstellen von solchen Skripten aus und könnte mir da evtl. Hilfestellung leisten?

Das wäre eine Riesen-Hilfe für mich!

Tausend Dank im Voraus!


automatisierte Skripten - Unkraut - 05.04.2009

Hallo Hatschepsut,
schau mal in der Hilfe (F1) unter dem Stichwort „Makro“ nach. Da gibt es eine Menge zu lesen, eigentlich auch gut erklärt.

Findet ihr in der Firma denn noch die Corel-Cds? VBA - es kann wahlweise installiert werden, sollte aufgespielt sein.
Freundliche Grüße vom Unkraut


automatisierte Skripten - hatschepsut - 05.04.2009

Hallo Unkraut!


In der programminternen Hilfe hatte ich schon nachgeschaut und auch schonmal ein solches Makro aufgezeichnet.

Aber speziell beim Punkt der Farbanpassung (und die kostet mit Abstand die meiste Zeit) scheint es Probleme zu geben, genauer gesagt: die wird überhaupt nicht gemacht (Fehlermeldungen in diesem VBA-TExt).

Weiß da evtl. jemand Rat oder könnte versuchen, selber für so einen von mir beschriebenen Prozeß an einem kleinen Eigenbeispiel so etwas durchzuspielen?

Ich weiß, daß das viel verlangt ist, aber ich bin echt am verzweifeln mit dieser AufgabeSad

Nochmals Danke!


automatisierte Skripten - Unkraut - 05.04.2009

Hallo Hatschepsut,
was meinst Du? Ist es ein Anreiz, mit den Englishmen in Canada zu konkurrieren? Also, mich hat es gelähmt. Natürlich ich werde ihre Antworten verfolgen.

Freundliche Grüße von Unkraut


automatisierte Skripten - hatschepsut - 06.04.2009

Unkraut schrieb:was meinst Du? Ist es ein Anreiz, mit den Englishmen in Canada zu konkurrieren? Also, mich hat es gelähmt. Natürlich ich werde ihre Antworten verfolgen.



Hallo Unkraut!


...hmmm...ich verstehe leider nicht so ganz, was genau Du mit dieser Frage meinst? :? Oder bezieht sich das auf den Post im Englischen Forum von CorelDraw?

Ahh, jetzt...:-) Ja, da hat tatsächlich auch jemand geantwortet! Aber der macht einem nicht gerade viel Mut, es scheint sich dabei wirklich um ein massives Problem zu handeln, wenn der von 5-8 Stunden professioneller Programmier-Leistung ausgeht :-(

Ich hatte gehofft, daß das ein Standardproblem ist, aber anscheinend braucht es da wirklich eine Fremdfirma. Trotzdem nochmals Danke für die Hilfe!


Nachtrag: bezieht sich die "Lähmung" darauf, daß Du mir jetzt beleidigt bist?


automatisierte Skripten - Unkraut - 06.04.2009

hatschepsut schrieb:Hallo Unkraut!


Oder bezieht sich das auf den Post im Englischen Forum von CorelDraw?

Yeap!
http://coreldraw.com/forums/t/12429.aspx

und geantwortet hatte er schon gestern. Außer bei Punkt 5 dürfte er auch bei Punkt 4 Unklarheiten haben.

Und falls Du seinen Links gefolgt sein solltest: er ist ein Profi.

Freundliche Grüße vom Unkraut


automatisierte Skripten - Nimbin - 07.04.2009

hatschepsut schrieb:6.) alle gefundenen Farben in einem bestimmten Muster umstellen (also z.B. ein irgendwie gearteter Rot-Ton muß auf das reine Rot aus dem Farbstil-Menu umgestellt werden)
Wie jetzt genau? Wie man z.B. aus einem Farbfoto ein Schwarzweißfoto macht, nur eben in rot...?

Zitat:7.) alle Buchstaben von einer Umrandung befreien und auf eine bestimmte Schriftart und Größe umstellen

Liegen die Buchstaben als Kurve oder Text vor? Ersteres würde nicht machbar sein...

Schau dir mal die PDF "VBA-Programmierung" an - müßte irgendwo im Corel-Ordner rumliegen.
Ein bisschen Querlesen schadet net...:lol:

Gruß,
Nimbin


automatisierte Skripten - fritzbuser - 13.04.2009

Leider gibt es diese Möglichkeit nur im Photopaint. Im CorelDraw ist sie auf der Strecke geblieben. In der Version 8 gab es noch eine einfache Möglichkeit, wiederkehrende Befehle in ein programm aufzunehmen. Das 8 war gar nicht so schlecht, vielleicht würde es ja damit gehen.
Fritz


automatisierte Skripten - Nimbin - 13.04.2009

fritzbuser schrieb:Leider gibt es diese Möglichkeit nur im Photopaint. Im CorelDraw ist sie auf der Strecke geblieben.
Fritz

Ich denke, wir reden hier von EPS-Dateien, also Vektorgrafiken. Mit einem kurzen Makro kann man leicht allen Kurven der Grafik einen anderen Farbton geben...

Also z.B. so:

for each sh in ActiveShapes
sh.Fill.UniformColor.ConvertToGray
Next

fertig!

Gruß,
Nimbin