Hi,
kann man in Delphi breite Linien mit einem TBrushStyle füllen?
Oder muss ich die Linie erst in ein Polygon wandeln?
Aktuell erhalte ich nur gefüllte Linien.
Code:
try
MyCanvas.Brush.Style := TBrushStyle(StrToInt(MyPenStyle))
except
MyCanvas.Brush.Style := TBrushStyle.bsSolid;
end;
MyCanvas.Brush.Color := MyPencolor;
MyCanvas.Pen.Color := MyPencolor;
MyCanvas.Pen.Width := (PixelWidth);
MyCanvas.MoveTo(X1, Y1);
MyCanvas.LineTo(X2, Y2);
Danke
Jacks