Farbdatei

[markus5766h]

Hallo,
ich hab für ein Projekt eine Farbdatei mit 76 Farbschemata erstellt,
die ich hier zur Verfügung stelle.
Die Datei ist eine *.dat-Datei.
die Farbwerte werden mit StringToColor() zugewiesen.
Jedes Farbschema besteht aus 7 Farbwerten :
1. Startfarbe für Farbverlauf (z.B. Gradient)
2. Endfarbe für Farbverlauf
3. Textfarbe
4. Buttonfarbe
5. Buttonfarbe für mousesensitives Verhalten (Hover-Farbe)
6. Farbe für Listboxen, Memos o.ä.
7. Textfarbe für inaktiven Text

[himitsu]

Meine erste Frage wäre jetzt allerdings:
Was braucht man, um diese Farben in sein Programm reinzubekommen?

[markus5766h]

Hallo,
ich habe die Datei in eine StringList geladen.
Die Komponenten verwalte ich dynamisch in einem Array,
so dass ich die Farbzuweisungen über Schleifen vornehmen kann.
erstmal in der StringList kann man den Zugriff frei gestalten.
Beispiel

Delphi-Quellcode:

procedure ...irgendwas
var
ColorList : TStringList
C1, C2, C3, C4, C5, C6, C7 : TColor;
n : Integer;
begin
ColorList := TStringList.Create;
n := 14; //Farbschema 14
 ColorList.LoadFromFile('Colors.dat');

  C1 := StringToColor(ColorList[n*7]);
  C2 := StringToColor(ColorList[n*7 +1]);
  C3 := StringToColor(ColorList[n*7 +2]);
   .
   .
   .
  C7 := StringToColor(ColorList[n*7+6]);

ColorList.Free;
end;

wahrscheinlich ist es vorteilhafter C1 ... C7 global zu deklarieren -
im Abschnitt private oder public

[mr_emre_d]

Zitat:

Zitat von markus5766h

Delphi-Quellcode:

  n := 14; //Farbschema 14
  C1 := StringToColor(ColorList[n*7]);

Ähm, wäre das nicht Farbschema 15 :P
(0 zählt auch)

MfG

[himitsu]

Eigentlich meinte ich mehr die Komponenten, welchen dann diese Farben zugeordnert werden.
Bei den Standard-Komponenten, von Delphi, wird es wohl schwer diese Farben einfach so zuzuweisen, daß es am Ende so aussieht. :zwinker:

[markus5766h]

Hallo,
der Button ist ein TSRColorButton (Simon Reinhardt > P.I.C.S.),
die Gradient Komponente ist ebenso von Ihm.
es gibt auch bei den Jedis 'ne ganze Menge Komponenten.
In der DP gibt's irgendwo auch eine Kompo mit 'nem
seht vielseitig konfigurierbaren Button ... vielleicht
find ich's noch mal.
Notfalls kann man sich ja auch 'ne Komponente ableiten,
hab's bei einigen Buttons gemacht, um ein "mouseleave"-
Ereignis zu bekommen.

zum Farbschema: ist Nummer 14, wenn ich das erste Farbschema
mit "0" bezeichne - sonst 15 ... jeder wie er will

Ich hab die beiden Komponenten angehangen.
Die Dateien sind Public Domain, Urheberrecht bei Simon Reinhardt,
weitere Infos in den Units