Difference between revisions of "RGBTOTColor/de"

From Free Pascal wiki
Jump to navigationJump to search
m
m
Line 22: Line 22:
 
<br>
 
<br>
 
--[[User:Olaf|Olaf]] 11:05, 30 April 2013 (UTC)
 
--[[User:Olaf|Olaf]] 11:05, 30 April 2013 (UTC)
[[Category:Code Parts/de]]
+
[[Category:Code Parts/de]]{{AutoCategory}}

Revision as of 08:27, 23 August 2013

Deutsch (de)

Wandelt RGB-Farbwerte in den Datentyp TColor um.

Die maximalen Werte von RGB sind 255, 255, 255. Das Ergebnis ist die Farbe Weiss.
Die minimalen Werte von RGB sind 0, 0, 0. Das Ergebnis ist die Farbe Schwarz.

uses
  Graphics, ...;

...

function funRGBToTColor(bytRot, bytGruen, bytBlau: byte): TColor;
begin
  Result := bytBlau shl 16 or bytGruen shl 8 or bytRot;
end; 

...



--Olaf 11:05, 30 April 2013 (UTC)