Einzelnen Beitrag anzeigen

Kevinpptx

Registriert seit: 10. Okt 2022
Ort: Sachsen
27 Beiträge
 
Delphi 11 Alexandria
 
#10

AW: Transparenz-Farbe von TImage ändern

  Alt 27. Apr 2024, 19:07
Was bringt dich denn auf diese Idee?
Zitat:
// ...das hier #5334FE (hex) zurückgibt, was ja $FE5334 (delphi) ist
Hier mal die Implementierung:
Delphi-Quellcode:
function ColorToRGB(Color: TColor): Longint;
begin
  if Color < 0 then
    Result := GetSysColor(Color and $000000FF) else
    Result := Color;
end;
Ich war unter der Auffassung. Auf jeden Fall funktioniert es ja nicht. Nicht mit $FE5334 und nicht mit $5334FE, was auch immer richtig ist. Obwohl es ja zu 100% diese Farbe ist. Vorher hat es ja auch funktioniert, ich habe nichts geändert. Jetzt nicht mehr.
  Mit Zitat antworten Zitat