Bemassung in Pixel

[Mike05]

Hallo zusammen,
ich habe folgendes Problem und hoffe euch fällt dazu vielleicht ein Workaround oder besser vielleicht eine Lösung ein. ;-)
 
In Corel werden Zeichnungen erstellt, die später auf einem Display umgesetzt werden
Damit das "Feeling" sofort richtig ist, wird arbeiten wir direkt in Pixel.
Nun sollen Bemaßungen eingegeben werden.
Leider  - zumindest sehe und finde ich es nicht - gibt es keine Möglichkeit die Einheiten auf Pixel einzustellen.
aktuell behelfen wir uns damit, die Einheiten auszublenden und dann die Werte manuell einzutragen.
Das ist müßig und auch nervend.
Hat jemand vielleicht einen anderen Lösungsansatz?
Wir wären sehr (!!) dankbar.
 
Einen schönen Tag und ich bin gespannt auf eure Ideen Mike05

[miss_marple]

Hallo Mike05,

das ist in Corel Draw und anderen Vektor-Zeichenprogrammen (Illustrator, Affinity Designer) nicht möglich.
  
Corel Draw zeigt am Lineal zwar Pixel an, intern misst es aber trotzdem mit Zoll / mm / usw.
Pixel haben aber keine definierte Länge und Breite, ihre Größe wird vom Ausgabegerät bestimmt. (Bildschirm, Drucker: Anzahl der Bildpunkte pro Zoll = Auflösung).

Standardmäßig geht Corel Draw davon aus, dass 300 Pixel auf 1 Zoll (=25,4 mm) passen.
Man könnte auch eine andere Auflösung einstellen - aber welche? Du kennst ja die Auflösung der zukünftigen Ausgabegeräte gar nicht.
Außerdem würde Corel dann die Anzahl der Pixel ändern - nicht etwa die mm, siehe dieses Video. Achte mal auf das Lineal!

Warum exportiert ihr die Zeichnungen am Ende nicht in ein Pixelformat, z.B. *.jpg, *.png, oder was auch immer? 
Bei diesen Standard-Formaten zeigt der Windows Explorer dann die Pixelmaße schon beim Draufzeigen an. 

MfG
miss_marple

[koter]

Hallo Mike,

...Leider  - zumindest sehe und finde ich es nicht - gibt es keine Möglichkeit die Einheiten auf Pixel einzustellen.
aktuell behelfen wir uns damit, die Einheiten auszublenden und dann die Werte manuell einzutragen.
Das ist müßig und auch nervend...

eine Möglichkeit die Einheiten auf Pixel einzustellen kenne ich nicht.
Man könnte höchstens die manuelle Arbeit automatisieren:



Alle von Miss Marple aufgezählten Einschränkungen müssen natürlich beachtet werden!

Folgender Code bearbeitet horizontale und vertikale Bemaßungen (und nur diese):

Code:

Sub PixDim()
   Dim s As Shape, ts As Shape, tsNeu As Shape, B As Shape
   Dim Einheit As String
   Dim x As Double, y As Double, Width As Double, Height As Double
   Dim Abstand As Integer
   Dim c As New Color
   
   c.RGBAssign 255, 255, 255
   ActiveDocument.Unit = cdrPixel
   
   Einheit = "Pxl"
   Abstand = 6
   
   If Einheit <> "" Then Einheit = " " & Einheit
   ActiveDocument.BeginCommandGroup "Pixelmaße"
   Application.Optimization = True
   For Each s In ActiveLayer.FindShapes(Type:=cdrLinearDimensionShape)
       Set ts = s.Dimension.TextShape
       Set tsNeu = s.Dimension.TextShape.CopyToLayer(ActiveLayer)
       If s.Dimension.Linear.Type = cdrDimensionHorizontal Then
           tsNeu.Text.Story = Round(s.SizeWidth, 0) & Einheit
           tsNeu.CenterX = ts.CenterX
       ElseIf s.Dimension.Linear.Type = cdrDimensionVertical Then
           tsNeu.Text.Story = Round(s.SizeHeight, 0) & Einheit
           tsNeu.CenterY = ts.CenterY
       End If
       ts.Fill.ApplyNoFill
       tsNeu.BoundingBox.GetRect x, y, Width, Height
       Set B = ActiveLayer.CreateRectangle2(x - Abstand, y - Abstand, Width + Abstand * 2, Height + Abstand * 2)
       With B
           .Fill.ApplyUniformFill c
           .Outline.SetNoOutline
           .OrderBackOf tsNeu
       End With

       ActiveSelectionRange.Shapes.All.RemoveFromSelection
       s.CreateSelection
       s.Style.GetProperty("dimension").SetProperty "textPlacement", cdrDimensionAboveLine
   Next
   Application.Optimization = False
   ActiveSelectionRange.Shapes.All.RemoveFromSelection
   ActiveDocument.EndCommandGroup
   Application.Refresh
   
End Sub

Gruß

Koter

[norre]

Hallo,

...das ist in Corel Draw und anderen Vektor-Zeichenprogrammen (Illustrator, Affinity Designer) nicht möglich....

wobei Corel die Pixelmaße in Abhängigkeit der eingestellten Auflösung in den Eigenschaften schon anzeigt.
Beim Ändern der Auflösung Objekt einmal ab und wieder anwählen.

   

Gruß
Norre

[miss_marple]

@norre
Richtig!
Eigentlich kann es die Umrechnung in Abhängigkeit von der Auflösung. Es könnte also durchaus die Anzahl der Pixel bei einer Bemaßung anzeigen, zumindest für horizontal und vertikal.

Es ist eben voll auf Linien / Kurven getrimmt, die Pixel-Unterstützung ist nur halbherziger Spielkram.

Lustig ist z.B. folgene Situation: Ein Rechteck ohne Umriss hatt 400 x 200 Pixel; fügt man einen Umriss hinzu, bleibt die Maßanzeige auf 400 x 200 Pixel, egal, wie dick der Umriss ist. Bei der Umrissauswahl stehen auch gar keine keine Pixel zur Verfügung.
Stellt man unter Ansicht "Pixel" ein, wird natürlich alles mit Pixel-"Rechenkästchen" überlagert - sehr hübsch schattiert bei runden Formen - nur die Maße ändern sich nicht.   

LG
miss_marple

[koter]

Hallo Miss Marple,

...Es ist eben voll auf Linien / Kurven getrimmt, die Pixel-Unterstützung ist nur halbherziger Spielkram.

Lustig ist z.B. folgene Situation: Ein Rechteck ohne Umriss hatt 400 x 200 Pixel; fügt man einen Umriss hinzu, bleibt die Maßanzeige auf 400 x 200 Pixel, egal, wie dick der Umriss ist...

...Das macht CD bei Vektoren genau so. Erst wenn ein Umriss in ein Objekt gewandelt wird, wird er in die Maße einbezogen. Wenn Du das Kriterium anlegst, ist CD auch bei Vektoren nur „halbherziger Spielkram“.

...Bei der Umrissauswahl stehen auch gar keine keine Pixel zur Verfügung...

Ein Screenshot (X6):




Die „hübsche Schattierung“ ist eigentlich gar keine. Man nennt das Antialiasing. Es dient zur Verminderung des Treppeneffekts bei Bitmaps.

Ob dieser Beitrag wohl ein Schnellschuss war? 

Gruß

Koter