TwinCat 2 Farbe von Drawpolygon ändern

Hendrik

Hendrik

Level-1
Beiträge
219
Reaktionspunkte
19
Zuviel Werbung?
-> Hier kostenlos registrieren
Moin,

da ich zwei kurven mit drawpolygon gezeichnet in einem diagramm darstellen möchte, soll eine Kurve eine andere Farbe bekommen.
der Support von Beckhoff sagt das diese FUN nicht supportet wird, voin Codeysy habe ich die FUN SETLINE als Tipp bekommen.
Code: 
bDraw := DrawPolygon(
            nNumberOfPoints := gDrawKurve.NumerOfPoints ,
            pnXPoints := ADR(gDrawKurve.XDaten[0]),
            pnYPoints := ADR(gDrawKurve.YDaten[0]),
            stText := '',
            dwDrawFlags := dwDrawFlags,
            nType := nType,
            bVisible := TRUE);
                IF ShowT2 =TRUE THEN (* T2Kurve zeichnen wenn gewünscht*)
                    (*SetFill(dwFillFlags:= 0, dwFillColor:=16#FF0000 );
                    SetLine(nBorderWidth:=1, dwBorderFlags:=0 , dwBorderColor:=16#FF0000);*)
                    bDraw2 := DRAWPolygon(
                        nNumberOfPoints := gDrawKurve2.NumerOfPoints ,
                        pnXPoints := ADR(gDrawKurve2.XDaten[0]),
                        pnYPoints := ADR(gDrawKurve2.YDaten[0]),
                        stText := '',
                        dwDrawFlags := dwDrawFlags,
                        nType := nType,
                        bVisible := TRUE);
                    (*SetFill(dwFillFlags:= 0, dwFillColor:=0 );
                    SetLine(nBorderWidth:=0, dwBorderFlags:=0 , dwBorderColor:=0);*)
                END_IF
Habe die farbänderung bisher auskommentiert da es zu seiteneffekten kommen. Hat jemand einen Tipp? oder mache ich generell etwas falsch?

Mfg
Hendrik
 
Zurück
Oben