Delphi-PRAXiS - Einzelnen Beitrag anzeigen

Dann eben so:

Delphi-Quellcode:

			function InvertTColor(Color: TColor): TColor; 

begin 

  Result := (not ColorToRGB(Color)) and $00FFFFFF; 

end;

Steht übrigens auch in der CodeLib

Dax (Gast) n/a Beiträge	#7 Re: farbe invertieren??? 24. Nov 2004, 07:24 Dann eben so: markieren Delphi-Quellcode: function InvertTColor(Color: TColor): TColor; begin Result := (not ColorToRGB(Color)) and $00FFFFFF; end; Steht übrigens auch in der CodeLib
	Zitat