Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**WojTec**

Get RGB from TColor:

Delphi-Quellcode:

			R := AColor and $FF;

G := (AColor shr $8) and $FF;

B := (AColor shr $10) and $FF;

Set TColor from RGB:
Result := (B shl $10) or (G shl $8) or R; Is it ok?

WojTec Registriert seit: 17. Mai 2007 482 Beiträge Delphi XE6 Professional	#1 Is this correct? 22. Mai 2011, 19:32 Get RGB from TColor: markieren Delphi-Quellcode: R := AColor and $FF; G := (AColor shr $8) and $FF; B := (AColor shr $10) and $FF; Set TColor from RGB: Result := (B shl $10) or (G shl $8) or R; Is it ok?
	Zitat