RGB2HLS

[Mirilin]

:hi:

Robert Rossmair's rrColors-Unit

[choose]

Zitat:

Zitat von Florian H

Mit den hier geposteten sachen kann ich leider nix anfangen, sind alle irgendwie anders, da muss ich so viel umstellen weil der code so mordslang ist...

Warum schreibst Du nicht eine Wrapper-(genauer: Adapter-)Funktion, um das Problem in den Griff zu bekommen? Sofern Dein Code nicht hochperformant sein muss, stellt das kein Problem dar.

Angenommen, Dein Code referenziert unübersichtlich und schlecht änderbar auf die nicht länger existierende Funkton

Delphi-Quellcode:

function Foo(const APoint: TPoint): Int64;

Dir steht nun die Funktion zu Verfügung

Delphi-Quellcode:

function Bar(const X, Y: Integer): Integer;

Dann könntest Du die Funktion Foo in der Art

Delphi-Quellcode:

function Foo(const APoint: TPoint): Int64;
begin
  with APoint do
    Result:= Bar(X,Y);
end;

durch eine eigene sog. Adapterfunktion implementieren und Deinen bisherigen Code, der eine spezielle Signatur benötigt, zu einer anderen Funktion mit andere signatur aber selben Aufgabe "kompatibel" machen.

[Florian H]

ja, werd ich wohl machen müssen.
danke :)

[Keldorn]

Hallo,

Delphi kennt übrigens auch ColorRGBToHLS und ColorHLSToRGB. Diese sind in der Unit Graphutil drin. Leider wird diese Unit nicht in der Delphi-Hilfe erwähnt. :roll:

Mfg Frank