[FMX, iOS] TAlphaColor Farbvergleiche falsch (nur iOS)

[Der schöne Günther]

Ich denke mal nicht dass es etwas mit Farben an sich sondern dem Konzept der varianten Records zu tun hat, oder?

Kannst du das mit einem Mini-Projekt nachstellen?

iOS 32 oder 64 Bit oder beide?

[Rollo62]

Dankesehr für den Hinweis, könnte damit zusammenhängen.

Ich habe aber leider keine Zeit mehr weiter zu Testen, habe damit schon wieder 1 Tag verloren,
und muss ein paar Projekttermine einhalten.

Aber sind enums überhaupt variante record-Typen ?
Ich dachte immer die werden nur auf Cardinal projeziert.

Getestet habe ich nur unter iOS-64, ich weiss gar nicht wie ich nur unter iOS-32 Testen sollte, womöglich geht das nur mit alter Hardware.
Oder starten die neueren iPhones noch reinen 32-Bit Code im Debug Modus ?

Rollo

[Der schöne Günther]

Enums haben hier doch nichts mit zu tun oder habe ich etwas verpasst?

Zitat von Rollo62:

Ich habe aber leider keine Zeit mehr weiter zu Testen, habe damit schon wieder 1 Tag verloren,
und muss ein paar Projekttermine einhalten.

Aus dem Grund machen wir nichts mehr mit RAD Studio/iOS/Android 👎

[Rollo62]

Delphi-Quellcode:

case LCol of
        TAlphaColorRec.Red : Result := TAlphaColorRec.Fuchsia;

Doch das könnte ja was damit zu tun haben, TAlphaColorRec.Red ist ein enum,
genau da funktioniert der Case nicht richtig.
Oder was meinst du genau mit den Records ?

[Der schöne Günther]

Zitat von Rollo62:

TAlphaColorRec.Red ist ein enum

Es ist eine ganz normale Konstante

[Rollo62]

Ja, stimmt, da hast du auch wieder Recht

Ich sag ja, ich kann mir das auch nicht erklären.
Vieleicht hat es was mit dem
    Azure = Alpha or TAlphaColor($F0FFFF); zu tun.

Hatte ja das PixelFormat in Verdacht, aber die Konvertierungsprobleme treten auch bei einer einfachen TAlphaColor Variablen auf.

Wie auch immer, bei iOS(64) lande ich IMMEr im else Zweig,
bei allen anderen OS holt er sich wie gewünscht das nächste Farbfeld.

Hast du das Demo mal getestet, oder verhält sich das bei dir etwa korrekt ?
Man muss natürlich den Fehlerfall ent-kommentieren ...

Delphi-Quellcode:

    LCol := Color_Swatch_Next_ByCase( LCol );  // TAlphaColor compare FAILURE
//    LCol := Color_Swatch_Next_ByIfthen( LCol );  // TAlphaColor compare OK

Rollo

[Der schöne Günther]

Zitat von Rollo62:

Hast du das Demo mal getestet, oder verhält sich das bei dir etwa korrekt ?

Sorry, bis ich den Mac Mini gefunden und die VM wo das RAD Studio für iOS halbwegs stabil lief wieder reaktiviert habe ist die Woche wahrscheinlich rum.
iOS müsste jemand anderes testen.