Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: RGB -- TColor allgemeine Verständnisfrage
28. Dez 2010, 17:51
Recht angenehm geht der Zugriff so
Delphi-Quellcode:
Type
TColorAcc = packed record
Red: Byte;
Green: Byte;
Blue: Byte;
Alpha: Byte;
end;
procedure Beispiel;
var
C:TColor;
begin
TColorAcc(c).Blue := $ff;
end;
Thomas Wassermann H₂♂ Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
|