SET RGB COLORS

Version 6.0

SET RGB COLORS ({*; }Objekt; Vordergrundfarbe; Hintergrundfarbe)

Parameter	Typ		Beschreibung
*			Wenn angegeben, ist Objekt ein Objektname
			(String). Wenn nicht angegeben, ist Objekt
			Feld oder Variable
Objekt	Formularobjekt		Objektname (wenn * angegeben), bzw.
			Feld oder Variable (wenn * nicht angegeben)
Vordergrundfarbe	Numerisch		RGB Wert für Vordergrundfarbe
Hintergrundfarbe	Numerisch		RGB Wert für Hintergrundfarbe

Der Befehl SET RGB COLORS ändert die Vordergrund- und Hintergrundfarben der in Objekt angegebenen Objekte.

Mit dem optionalen Parameter * geben Sie in Objekt einen Objektnamen (String) an. Ohne den optionalen Parameter * geben Sie in Objekt ein Datenfeld oder eine Variable an. In diesem Fall geben Sie anstatt eines Strings eine Referenz auf das Datenfeld oder die Variable an (nur Datenfeld- oder Variablenobjekte). Weitere Informationen dazu finden Sie im Abschnitt Objekteigenschaften.

In Vordergrund und Hintergrund geben Sie die RGB-Werte an. Ein RGB Wert ist eine lange Ganzzahl mit 4-byte im Format (0x00RRGGBB). Bytes werden von 0 bis 3 von rechts nach links numeriert:

Byte	Beschreibung
3	Muß bei absoluter RGB Farbe Null sein
2	Rote Komponente (0..255)
1	Grüne Komponente (0..255)
0	Blaue Komponente (0..255)

Folgende Tabelle zeigt einige Beispiele für RGB Farben:

Als Alternative können Sie aber auch eine der Farben verwenden, die beim Zeichnen von Objekten automatisch gesetzt werden. 4th Dimension bietet folgende vordefinierte Konstanten:

Das ergibt auf einem Standardsystem folgende Farben:

WARNUNG: Diese automatischen Farben hängen unter Windows vom System ab. Bei Änderungen der Systemfarben in der Systemsteuerung im Dialog Anzeige unter Darstellung paßt 4th Dimension die automatischen Farben entsprechend an. Verwenden Sie die Werte für automatische Farben, um Objekte mit Systemfarben und nicht mit den oben aufgeführten Beispielfarben zu versehen.

Dieses Formular enthält zwei nicht eingebbare Variablen vsColorValue und vsColor sowie drei Thermometer: thRed, thGreen und thBlue.

Für diese Objekte gelten folgende Methoden:

      ` Objektmethode für nicht eingebbaren Wert vsColorValue
   Case of 
      : (Form event=On Load)
         vsColorValue:="0x00000000"
   End case 

      ` Objektmethode für nicht eingebbare Variable vsColor
   Case of 
      : (Form event=On Load)
         vsColor:=""
         SET RGB COLORS(vsColor;0x00FFFFFF;0x0000)
   End case 
 
      ` Objektmethode für Thermometer thRed
   CLICK IN COLOR THERMOMETER 

      ` Objektmethode für Thermometer thGreen
   CLICK IN COLOR THERMOMETER 

      ` Objektmethode für Thermometer thBlue
   CLICK IN COLOR THERMOMETER 

Die Thermometer rufen folgende Projektmethode auf:

      ` Projektmethode CLICK IN COLOR THERMOMETER 
   SET RGB COLORS(vsColor;0x00FFFFFF;(thRed << 16)+(thGreen << 8)+thBlue)
   vsColorValue:=String((thRed << 16)+(thGreen << 8)+thBlue;"&x")
   If (thRed=0)
      vsColorValue:=Substring(vsColorValue;1;2)+"0000"+Substring(vsColorValue;3)
   End if 

Beachten Sie, daß zum Berechnen der Farbwerte aus dem Thermometer Bit Operatoren verwendet werden.

In der Benutzer- oder Runtime-Umgebung sieht das Formular folgendermaßen aus:

Bit Operatoren, SET COLOR.