XProfan

Español

Descripción:

El API GetSysColor ermittelt valor uno Systemfarbe.

Deklaration:

DEF @GETSYSCOLOR(1) !USER32,GetSysColor

Parámetro:

1.Parámetro: Zahlenkonstante para el auszulesende Systemfarbe como LongInt =>
-15 = Grundfarbe para dreidimensionale Objetos (z.B. Farbe de Buttons).
-21 = Dunkler Schatten para dreidimensionale Objetos.
-20 = Farbe para Hervorheben de dreidimensionalen Objekten.
-22 = Farbe para Lichteinstrahlung en dreidimensionale Objetos (para Kanten, el para Licht hin mentira).
-$10 = Schattenfarbe para dreidimensional angezeigte Objetos.(para Kanten, el el Lichtquelle gegenüber mentira).
-10 = Rahmen uno aktiven Fensters.
-2 = Titel uno aktiven Fensters.
-12 = Color de fondo para MDI-Anwendungen.
-1 = Color de fondo des Desktops.
-9 = Texto en el Titelleiste, Größenänderungsfeld y Pfeilfeld el Bildlaufleiste.
-17 = Deaktivierter Texto.
-13 = Ausgewählte Elemente uno Controls.
-14 = Texto en Elementen, el en un Control ausgewählt fueron.
-11 = Rahmenfarbe para inaktive Ventana.
-3 = Farbe para inaktive Fenstertitel.
-4 = Menühintergrundfarbe.
-7 = Texto en el Menü.
-0 = Grundfarbe de Scrollbars.
-5 = Fensterrahmen.
-8 = Texto en Fenstern.

Rückgabewert:

Farbwert el gesuchten Systemfarbe como LongInt.

Beispiele:

Kompilieren Marca Separación

DEF @GETSYSCOLOR(1) !USER32,GetSysColor
DEF @GETSYSCOLOR(1) !USER32,GetSysColor
Declare Button&
SetTrueColor 1
Windowstyle 31
Windowtitle Hintergrundfarbe von Hauptfenster ändern
Window 0,0-640,440
Let Button&=@Createbutton(%HWND,Farbe ändern,20,300,150,30)

While 0=0

    Waitinput

    IF @Getfocus(Button&)

        CLS @GetSysColor(15)

    Endif

Wend