hy hab grade die beiden invertcolor funktionen gesehen ...
warum in 3 teufelnamen nicht einfach so ?!?!:
Delphi-Quellcode:
function invertcolor(color: TColor):TColor;
begin
Result := ColorToRGB(Color) xor $00FFFFFF;
end;
wozu gibbet denn ne xor operation wenn nicht dafür ???
greetz
-FastJack2