VBA CorelDraw 12:

Computer: Software & Programmierung Visual Basic
#1

Hallo, liebe hilfsbereite Forumsleserinnen und Forumsleser!

Ich möchte in CorelDraw 12 eine Linie durch eine Prozedur zeichnen lassen. Mit den fünf Zeilen Quellcode funktioniert das auch, ich kann auch die Koordinaten der Punkte aus vorhandenen Variablen auslesen, damit es nicht immer dieselbe Linie ist.

Aber der Fall ist, dass ich nun Linien mit unterschiedlich vielen Punkten zeichnen möchte, die Zeile 3) sich aber nicht über eine Schleife vervielfältigen lässt.

Gibt es da einen speziellen Befehl, der eine Zeile Quellcode während des Programmablaufs generiert und interpretiert?

  1. Set crv = ActiveDocument.CreateCurve()
  2. With crv.CreateSubPath(1,1)
  3. .AppendLineSegment 2,2
  4. End With
  5. Set s4 = ActiveLayer.CreateCurve(crv)

Hintergrund ist, dass ich die angrenzenden Knotenpunkte zweier Linien über eine Prozedur zu einem Knotenpunkt zusammenfassen möchte, um die Anzahl der Objekte ich einem Dokument zu verringern. Der herkömmliche Weg über das Kombinieren der Linien, das Auswählen der Knotenpunkte und irt Zusammenfassen ist mir zu mühsam.

Danke für alle sachdienlichen Antworten.

Viele Grüße,
Martin

#2

Hallo Martin,

Ich möchte in CorelDraw 12 eine Linie durch eine Prozedur
zeichnen lassen.

was ist eine Prozedur in CorelDraw? Ich kenne Prozedur als Begriff für Sub-Routinen die in einem Modul des VB-Editors stehen.

Mit den fünf Zeilen Quellcode funktioniert
das auch, ich kann auch die Koordinaten der Punkte aus
vorhandenen Variablen auslesen, damit es nicht immer dieselbe
Linie ist.

Also

  1. .AppendLineSegment x,y

?

Aber der Fall ist, dass ich nun Linien mit unterschiedlich
vielen Punkten zeichnen möchte, die Zeile 3) sich aber nicht
über eine Schleife vervielfältigen lässt.

Du kannst doch in Schleifen verschiedene x und y Werte erzeugen lassen.

Gibt es da einen speziellen Befehl, der eine Zeile Quellcode
während des Programmablaufs generiert und interpretiert?

Ja, das geht, sicher auch mit Corel Draw. Man kann schon zur Laufzeit einer Prozedur ein Modul erstellen mit einer Prozedur in sich und dann diese Prozedur starten.

Hintergrund ist, dass ich die angrenzenden Knotenpunkte zweier
Linien über eine Prozedur zu einem Knotenpunkt zusammenfassen
möchte, um die Anzahl der Objekte ich einem Dokument zu
verringern. Der herkömmliche Weg über das Kombinieren der
Linien, das Auswählen der Knotenpunkte und irt Zusammenfassen
ist mir zu mühsam.

Klingt verständlich für jd. der CorelDraw kennt, leider weiß ich absolut nicht von was du sprichst, mangels jedweder CorelDraw kenntnis.

Mein Tipp, stelle deine Frage in einem CorelDraw Forum…

Gruß
Reinhard

Gruß
Reinhard