XProfan

Español

Jac
de
Lad

Gibt lo una Möglichkeit, el Textfarbe o. Color de fondo una Controls (STATIC) mittels Profano- oder Windows-Bordmitteln a festzulegen?

Jac

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

18.02.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Rolf
Koch

Hi,

con Subclass siehe en Andreas Miehtes Página oder como gehabt con el genialen SKCONTROL.DLL (gehe aber su de, dass Usted esta sólo no nutzen willst lt. Deines Postings).

Oder mach lo así, porque create(Mapa de bits .... es sí auch una Static

Kompilieren Marca Separación

CLS

Proc COLORSTATIC

    declarar colst&,c.dm&
    parámetros c.hwnd&,c.txt$,c.x&,c.y&,c.b&,c.h&,c.hwcol&,c.txtcol&
    mcls c.b&,c.h&
    STARTPAINT -1
    cls c.hwcol&
    usefont ms sans serif,13,0,0,0,0
    textcolor c.txtcol&,-1
    Drawtext 2,2,c.txt$
    savebmp DUM.BMP,0,0-c.b&,c.h&
    ENDPAINT
    c.dm& = CREATE(HPIC,-1,DUM.BMP)
    colst&=Crear(BITMAP,%HWND,c.dm&,c.x&,c.y&)
    Asignar #1,DUM.BMP
    Borrar #1
    volver colst&

ENDPROC

declarar static1&,static2&
COLORSTATIC %HWND,Dies es una Test,10,10,120,20,RGB(255,0,0),RGB(255,255,255)
STATIC1&=&(0)
COLORSTATIC %HWND,Naja todavía uno,10,35,120,20,RGB(0,0,255),RGB(0,255,255)
STATIC2&=&(0)
WAITINPUT

Nur grob como Presentación.
Könntest sí todavía mehr así hacer: Font angeben, Position des Textes u.s.w.

Editar:
Hier algo Yo mi:

Kompilieren Marca Separación

CLS

Proc COLORSTATIC

    declarar colst&,c.dm&
    parámetros c.hwnd&,c.txt$,c.x&,c.y&,c.b&,c.h&,c.hwcol&,c.txtcol&,FT$,gr&,bold&
    mcls c.b&,c.h&
    STARTPAINT -1
    cls c.hwcol&
    usefont FT$,gr&,0,bold&,0,0
    textcolor c.txtcol&,-1
    Drawtext 2,2,c.txt$
    savebmp DUM.BMP,0,0-c.b&,c.h&
    ENDPAINT
    c.dm& = CREATE(HPIC,-1,DUM.BMP)
    colst&=Crear(BITMAP,%HWND,c.dm&,c.x&,c.y&)
    Asignar #1,DUM.BMP
    Borrar #1
    volver colst&

ENDPROC

declarar static1&,static2&
COLORSTATIC %HWND,Dies es una Test,10,10,120,20,RGB(255,0,0),RGB(255,255,255),MS SANS SERIF,13,0
STATIC1&=&(0)
COLORSTATIC %HWND,Naja todavía uno,10,35,120,20,RGB(0,0,255),RGB(0,255,255),ARIAL,18,1
STATIC2&=&(0)
WAITINPUT

18.02.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Jac
de
Lad

Hm...

Yo voluntad, dass el Hintergrund el Überschriften en InstallChild weiß es. Deswegen hacer se como Bitmaps schlecht. Aquí está buscando veces más, danke para el Antwort!

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

18.02.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

¿Por qué no drawtext

18.02.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Rolf
Koch

Sorry kapier Yo no, porque gerade Bitmaps oder Gráficos runden una Programa de.
Und obiges wäre en Deinem Fall genau el Richtige.

Kompilieren Marca Separación

DEF GETSYSCOLOR(1) !USER32,GetSysColor
CLS GETSYSCOLOR(15)

Proc COLORSTATIC

    declarar colst&,c.dm&
    parámetros c.hwnd&,c.txt$,c.x&,c.y&,c.b&,c.h&,c.hwcol&,c.txtcol&,FT$,gr&,bold&
    mcls c.b&,c.h&
    STARTPAINT -1
    cls c.hwcol&
    usefont FT$,gr&,0,bold&,0,0
    textcolor c.txtcol&,-1
    Drawtext 2,2,c.txt$
    savebmp DUM.BMP,0,0-c.b&,c.h&
    ENDPAINT
    c.dm& = CREATE(HPIC,-1,DUM.BMP)
    colst&=Crear(BITMAP,%HWND,c.dm&,c.x&,c.y&)
    Asignar #1,DUM.BMP
    Borrar #1
    volver colst&

ENDPROC

declarar static1&,static2&
COLORSTATIC %HWND,Willkommen para hypergeilen Setup,0,0,width(%hwnd),35,RGB(255,255,255),RGB(0,0,255),MS SANS SERIF,30,1
STATIC1&=&(0)
WAITINPUT

18.02.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Jac
de
Lad

Naja, Yo debería para cada Schritt una neues Mapa de bits hacer, außerdem hätte Yo entonces Problemas con el Zeilenumbruch. Ok, Yo überdenke el otra vez!

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

19.02.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Rolf
Koch

Lo se doch sólo una Dummybitmap erstellt y Usted rufst lo sí como una Createtext en. Usted necesidad auch no Umbruch, pero setzt el Statics así, como si mehrere Textos setzt:

Texto1 ------------- Texto1 = 30 px encima kmpl. Longitud
Texto2 ------------- Texto2 = 15 px encima kmpl. Longitud

19.02.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Jac
de
Lad

Hm, ok, Yo probiers! Gracias!

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

19.02.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita