komisches TColor

[Ghostwalker]

Folgender Code zur Umwandlung von TColor nach TRGB gibt....interresante Resultate:

Delphi-Quellcode:

Class Operator TRGB.Implicit(const value:Tcolor):TRGB;

begin
  result.Red := GetRValue(ColorToRGB(value));
  result.Green := GetGValue(ColorToRGB(value));
  result.Blue := GetBValue(ColorToRGB(value));
end;

Sobald ich hier mit value = clPurple reingehe, bekomm ich $FFFFFF ?

Kann mir das bitte mal jemand erklären ??

[Papaschlumpf73]

Erklären kann ich das auch nicht; hatte aber schon mal das Problem mit ColorToRGB - ebenfalls mit den Systemfarben. Die Lösung war recht einfach: Zuerst clPurple einer Variable (Integer oder Cardinal oder so) zuweisen und anschließend mit GetRValue die neue Variable auswerten.

[Ghostwalker]

Ähmm.....du siehst schon das das ein Operator is oder ? *G

clPurple ist jetzt der Wert, der Ärger macht (könnte auch noch mehr geben). ColorToRGB macht ja eigentlich nix anderes als das Palette-Byte Von TColor zu löschen. Das sollte Emba eigentlich schon hinbekommen.

[stahli]

Du musst den realen Farbwert m.E. erst noch aus der Farbpalette auslesen oder so.
Ist aber für mich so lange her, dass ich nicht mehr sicher bin.

[Uwe Raabe]

Bei mir kommt da ganz korrekt $FF $00 $FF raus. Allerdings habe ich das eventuell anders implementiert als du. Kannst du ein minimales Beispielprojekt machen?

[Ghostwalker]

Ok...hat sich erledigt. Das ganze funktioniert schon richtig.

Der Fehler lag (oder besser sitzt) mal wieder vorm PC :wall::wall::wall::wall::wall::wall::wall:

[Uwe Raabe]

Select isn't broken: The First Rule of Programming: It's Always Your Fault

[Fukiszo]

Ach ja, das Gefühl kenn ich zu genüge,
sowie mit meinem DragAcceptFiles() problem, du hast deins wenigsten lösen können, ich steh bei mir immer noch total auf'm schlauch und komm partout nicht weiter.... nachteil bei mir ist halt das es komplett per WinAPI programmiert ist und ich jeden befehl testen müsste bis ich irgendwann mal den fehler finde. Grrrrrrr

[Luckie]

Zitat:

Zitat von Ghostwalker (Beitrag 1391461)

Ok...hat sich erledigt. Das ganze funktioniert schon richtig.

Der Fehler lag (oder besser sitzt) mal wieder vorm PC :wall::wall::wall::wall::wall::wall::wall:

Und was war jetzt DEIN :mrgreen: Fehler?

[Ghostwalker]

Ganz einfach. Nur die falsche Property der ColorCombo verwendet.