Einzelnen Beitrag anzeigen

Benutzerbild von Sherlock
Sherlock

Registriert seit: 10. Jan 2006
Ort: Offenbach
3.557 Beiträge
 
Delphi 10.4 Sydney
 
#2

AW: FMX bunte Linien zeichnen .... Random Farbwert

  Alt 17. Aug 2020, 14:34
Lustigerweise heisst in FMX so ziemlich alles anders als gewohnt...klingt aber ähnlich, so daß man sich nie sicher sein kann, ob es nun stimmt. Aber ich male auch Linien in FMX, mal sehen, wie das bei mir zur Zeit umgesetzt ist.

Delphi-Quellcode:
  aBMP.Canvas.Stroke.Color := TAlphaColors.Pink; // Definiert als Pink = Alpha or TAlphaColor($FFC0CB)

{$IF CompilerVersion >= 32.0} // >= Tokyo
  aBMP.Canvas.Stroke.Thickness := 1;
{$ELSE}
  aBMP.Canvas.StrokeThickness := 1;
{$ENDIF}
  aBMP.Canvas.Stroke.Dash := TStrokeDash.Solid;
  aBMP.Canvas.DrawLine(Pointf(0, 0), Pointf(aBMP.Width, aBMP.Height), 1);
Zu setzen ist also die Stroke Property des Canvas.

Sherlock
Geändert von Sherlock (Morgen um 16:78 Uhr) Grund: Weil ich es kann
  Mit Zitat antworten Zitat