XProfan

Español

Descripción:

DrawStatusText características una Texto en una Ventana y umgibt esta Texto con un Rahmen en el angegebenen Art.

Deklaration:

DEF @DrawStatusText(4) !comctl32.dll,DrawStatusTextA

Parámetro:

1.Parámetro: Display-Context (DC) des Objektes, en el el Texto erscheinen se como LongInt.

2.Parámetro: Struktur oder 16 Byte großer Zona, el el Ecken des a zeichnenden Rahmens determinado. =>
-Byte 0-3 = X-Koordinate el linken obere Ecke des Rahmens.
-Byte 4-7 = Y-Koordinate el linken obere Ecke des Rahmens.
-Byte 8-11 = X-Koordinate el rechten unteren Ecke des Rahmens.
-Byte 12-15 = Y-Koordinate el rechten unteren Ecke des Rahmens.

3.Parámetro: Adresse uno Cuerdas oder Bereichsvariable con un String, el el anzuzeigenden Texto enthält.

4.Parámetro: Flag, el angiebt como el Rahmen suscrito voluntad se: =>
-$0 = versenkt
-$100 = kein Rahmen (flach)
-$200 = hervorgehoben

Rückgabewert:

El Función ha no Rückgabewert.

Beispiele:

Kompilieren Marca Separación

DEF @GetSysColor(1) !"USER32","GetSysColor"
DEF @DrawStatusText(4) !"comctl32.dll","DrawStatusTextA"
DEclare RECT#,TEXT$
SetTrueColor 1
Windowstyle 31
Windowtitle "Statustext"
Ventana 0,0-640,440
CLS @GetSysColor(15)
DIM RECT#,16
Largo RECT#,0=50
Largo RECT#,4=50
Largo RECT#,8=250
Largo RECT#,12=75
Let Texto$="Statustext versenkt"
@DrawStatusText(%HDC,RECT#,@ADDR(TEXT$),0)
@DrawStatusText(%HDC2,RECT#,@ADDR(TEXT$),0)
Largo RECT#,0=50
Largo RECT#,4=100
Largo RECT#,8=250
Largo RECT#,12=125
Let Texto$="Statustext hervorgehoben"
@DrawStatusText(%HDC,RECT#,@ADDR(TEXT$),$200)
@DrawStatusText(%HDC2,RECT#,@ADDR(TEXT$),$200)
Largo RECT#,0=50
Largo RECT#,4=150
Largo RECT#,8=250
Largo RECT#,12=175
Let Texto$="Statustext flach"
@DrawStatusText(%HDC,RECT#,@ADDR(TEXT$),$100)
@DrawStatusText(%HDC2,RECT#,@ADDR(TEXT$),$100) Sonst kein Repaint!
DISPOSE RECT#

Mientras que 0=0

    Waitinput

Wend