Wer ist online?
Buchempfehlung
FreeBASIC-Chat
FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!Referenz - COLOR (Funktion)
Syntax: COLOR
Typ: Funktion
Kategorie: Konsole
Die Funktion COLOR gibt Informationen über die verwendeten Textfarben zurück.
In allen 32/24-Bit Farbmodi wird nur die Vordergrundfarbe (&hAARRGGBB; siehe 
RGBA) zurückgegeben.
Für die 16-Bit (und kleineren) Farbmodi wird der zurückgegebene Wert folgendermaßen berechnet:
(Vordergrund OR (Hintergrund SHL 16))
Das obere Word ist also die Hintergrundfarbe, während das untere Word die Vordergrundfarbe angibt.
Beispiel:
Screen 0
Dim c As UInteger
Color 14, 1
Cls ' erst nach CLS wird der Hintergrund gefärbt
c = Color() ' Abfragen der benutzten Farben
' mit LOWORD und HOWORD werden die Werte getrennt
Print "Konsolenfarben:"
Print "Schreibfarbe: " & LoWord(c)
Print "Hintergrund : " & HiWord(c)
Sleep
Screen 18, 32
' Setze orangene Schreibfarbe und blauer Hintergrund
Color RGB(255, 128, 0), RGB(0, 0, 164)
Cls ' erst nach CLS wird der Hintergrund gefärbt
' COLOR als Funktion gibt bei 32bit nur die Schreibfarbe an
Print "&h" & Hex( Color(), 6)
Print "&h" & Hex( RGB(255, 128, 0), 6)
SleepUnterschiede zu QB:
In QB kann COLOR nicht als Funktion eingesetzt werden.
Siehe auch:COLOR (Anweisung), WIDTH (Funktion), LOCATE (Funktion), SCREEN (Funktion), Grafik, Konsole
| Zusätzliche Informationen und Funktionen | ||||
|---|---|---|---|---|
|
||||
Versionen