Einzelnen Beitrag anzeigen

Kostas

Registriert seit: 14. Mai 2003
Ort: Gerstrhofen
1.060 Beiträge
 
Delphi 10 Seattle Enterprise
 
#1

TColor in TAlphaColor unwandeln

  Alt 21. Okt 2014, 22:36
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 nicht.
TAlphaColors.ColorToRGB($FF0000); Egal welche Farbe ich übergebe, wird immer eine Exception gefeuert "Access Violation".

Das Ziel ist den Integer für die Farbe(TColor) zu konvertieren in TAlphaColor damit die
Android App die Farbein gleich anzeigt wie in der Win32 Anwendung.

Gruß Kostas
  Mit Zitat antworten Zitat