Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Farbwert

    Delphi
    by Steve, 24. Feb 2005
  Stimmt.
  
  Ich wollte eigentlich nur demonstrieren, was dahinter steckt, denn nicht jeder weiß, was shr etc. macht ....und vor allem, wieso es hier aufgerufen wird. :)
  
  Gruß
  Stephan :dance:
• Forum: Multimedia

  Re: Farbwert

    Delphi
    by Steve, 24. Feb 2005
  :oops: Stimmt natürlich
  
  Gruß
  Stephan :dance:
• Forum: Multimedia

  Re: Farbwert

    Delphi
    by Steve, 23. Feb 2005
  Hi,
  
  das sollte inhaltlich dem Code vom "Vorposting" entsprechen:
  result := '#' + IntToHex(GetRValue(ColorToRGB(Col), 2) +
  IntToHex(GetGValue(ColorToRGB(Col), 2) +
  IntToHex(GetBValue(ColorToRGB(Col), 2);
  
  GetRValue etc. liefert den jeweiligen Rot-/Grün-/Blau-Anteil einer Farbe, zu finden in der Unit Windows. ColorToRGB wandelt Konstanten wie clBtnFace...