Ergebnis der Suchanfrage

• Forum: Multimedia

  AW: RGB-Gegenteil-Farbe ermitteln

    Delphi
    by Stevie, 18. Jul 2018
  Aber auch dort bin ich der Meinung, dass schwarz oder weiß auf bunt besser ist als magenta auf grün oder gelb auf blau.
• Forum: Multimedia

  AW: RGB-Gegenteil-Farbe ermitteln

    Delphi
    by Stevie, 18. Jul 2018
  Absolut! Das führt zu so Augenkrebs wie in der DevExpress Progressbar, die magentafarbene Schrift auf grüner Progressbar zeichnet :wall:
• Forum: Multimedia

  AW: RGB-Gegenteil-Farbe ermitteln

    Delphi
    by Stevie, 18. Jul 2018
  Wir nutzen diese Funktion hier, um die Schriftfarbe entsprechend dem Hintergrund zu wählen (aber nur entweder schwarz oder weiß) - das funktioniert dann so wie in dem Artikel, den Sakura gelinkt hat.
  
  function ContrastColor(AColor: TColor): TColor;
  type
  TRGB = packed record
  R, G, B, X: Byte;
  end;
  var
  LColor: TRGB;
  LLuminance: Double;