Ergebnis der Suchanfrage

• Forum: Cross-Platform-Entwicklung

  AW: TColor in TAlphaColor unwandeln

   
    by Kostas, 22. Okt 2014
  Danke für den Hinweis System.UIConsts
  
  Nur die Methode RGBtoBGR stellt die Farben richtig dar auf ein Windows und auf Android OS.
  
  
  uses System.UIConsts;
  ...
  Rectangle1.Fill.Color := RGBtoBGR($FF000000 + 255); //FF;
  Rectangle2.Fill.Color := RGBtoBGR($FF000000 + 65280); //FF00;
  Rectangle3.Fill.Color := RGBtoBGR($FF000000 + 16711680); //FF0000;
• Forum: Cross-Platform-Entwicklung

  TColor in TAlphaColor unwandeln

   
    by Kostas, 21. Okt 2014
  Hallo zusammen,
  
  ich habe in einer Datenbank zu einem Datensatz auch eine Farbe (TColor) als Integer gespeichert.
  In FireMonkey sind die Farben als TAlphaColor angelegt. Dabei ist Rot und Grün vertauscht wegen
  BigEndian oder LittleEndian. Stellt Delphi eine Methode zur Verfügung um aus einem TColor in ein TAlphaColor zu konvertieren?
  
  In diesem Zusammenhang funktioniert auch ColorToRGB...