Új hozzászólás Aktív témák

• #1428 Rolly veterán ViragL #1427

  Új Válasz 2007-01-15 02:33:36 #1428

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Rolly

  veterán

  válasz ViragL #1427 üzenetére

  tehát ebből hogyan tudom kinyerni a r,g,b értékeit?
  
  mod 3B majd
  div 2B
  mod 2B div B
  mod B?
  
  (div egészrészes osztás mod maradék )
  
  találtm egy ilyet
  
  procedure rgbValues(color:TColor;var red,green,blue:byte);
  begin
  red :=GetRValue(color);
  green:=GetGValue(color);
  blue :=GetBValue(color);
  end;
  
  azaz ha nekem egy 0.0 és 1.0 közötti szám kell színenként (1.0 a 255 0.0 a 0) akkor a kód így néz ki:
  
  procedure rgbValues(color:TColor;var red,green,blue:double);
  begin
  red :=(GetRValue(color)/255);
  green:=(GetGValue(color)/255);
  blue :=(GetBValue(color)/255);
  end;
  
  [Szerkesztve]

Új hozzászólás Aktív témák