Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.388 Beiträge
Delphi 12 Athens
|
Re: Eigenschaft CustomColor von TColordialog
14. Feb 2010, 20:13
ColorDialog1.CustomColors.Insert(0,'ColorA=' + Copy(ColorToString(Panel1.Color),2,8));
- ColorToString liefert den Farbwert in HEX als 8 stelligen Wert
- zum einfügen in den String brauchst du dann nur das "$" abschneiden
if ColorDialog.Execute then Panel.Color:= ColorDialog.Color;
- zurück ist einfach
|