Foro | | | | | 
Hubert
Binnewies | ¡Hola zusammen..
Yo como una Prob con el Fonts...
Yo habe folgendes Ventana principal:
KompilierenMarcaSeparaciónWINDOWSTYLE 538
WINDOWTITLE "Hauptfenster"
WINDOW 388,208-278,150
SETTRUECOLOR 1
CLS GETSYSCOLOR(15)
USEFONT "MS Sans Serif",16,0,1,0,0
SETDIALOGFONT 1
TEXT1& = CREATE("TEXT",%HWND,"Hauptfenster",0085,0007,0120,0020)
BUTTON1& = CREATE("BUTTON",%HWND,"Einstellungen",0010,0040,0120,0030)
BUTTON2& = CREATE("BUTTON",%HWND,"Information",0140,0040,0120,0030)
BUTTON3& = CREATE("BUTTON",%HWND,"Start",0010,0080,0080,0030)
BUTTON4& = CREATE("BUTTON",%HWND,"Hilfe",0095,0080,0080,0030)
BUTTON5& = CREATE("BUTTON",%HWND,"Beenden",0180,0080,0080,0030/span>
Damit Yo zwar ne schöne fette Überschrift, pero la Texto en el Buttons es auch Fett, qué unschön es.
Nun Yo intenta el código así abzuändern:
KompilierenMarcaSeparaciónWINDOWSTYLE 538
WINDOWTITLE "Hauptfenster"
WINDOW 388,208-278,150
SETTRUECOLOR 1
CLS GETSYSCOLOR(15)
USEFONT "MS Sans Serif",16,0,1,0,0
Fonthandle1%=%Font
USEFONT "MS Sans Serif",13,0,0,0,0
Fonthandle2%=%Font
SETDIALOGFONT 1
TEXT1& = CREATE("TEXT",%HWND,"Hauptfenster",0085,0007,0120,0020)
BUTTON1& = CREATE("BUTTON",%HWND,"Einstellungen",0010,0040,0120,0030)
BUTTON2& = CREATE("BUTTON",%HWND,"Information",0140,0040,0120,0030)
BUTTON3& = CREATE("BUTTON",%HWND,"Start",0010,0080,0080,0030)
BUTTON4& = CREATE("BUTTON",%HWND,"Hilfe",0095,0080,0080,0030)
BUTTON5& = CREATE("BUTTON",%HWND,"Beenden",0180,0080,0080,0030)
sendmessage(Texto1&,$0030,Fonthandle1%,0)
sendmessage(BUTTON1&,$0030,Fonthandle2%,0)
sendmessage(BUTTON2&,$0030,Fonthandle2%,0)
sendmessage(BUTTON3&,$0030,Fonthandle2%,0)
sendmessage(BUTTON4&,$0030,Fonthandle2%,0)
sendmessage(BUTTON5&,$0030,Fonthandle2%,0)
Das blöde es sólo:
Mach Yo inem Unterfenster una Multiedit en se el Schrift Fett, y berühre Yo sólo el Mauszeiger el Buttons en el Ventana principal se auch como el Schrift otra vez Fett.
Was mache Yo Falsch???? |
| | | | WinXP Prof, XProfan 9.1 Newbie
Ein kluger Kopf sagte mal:
"Nach dem derzeitigen Stand der Technik ist es unmöglich Programme zu schreiben, die fehlerfrei laufen!" | 22.05.2006 ▲ |
| | |
| |
Hubert
Binnewies | Habs ya selber rausbekommen.....
KompilierenMarcaSeparaciónWINDOWSTYLE 538
WINDOWTITLE "Hauptfenster"
WINDOW 388,208-278,150
SETTRUECOLOR 1
CLS GETSYSCOLOR(15)
hFont1% = @Create("Font","MS Sans Serif",13,0,0,0,0)
SETDIALOGFONT hFont1%
TEXT1& = CREATE("TEXT",%HWND,"Hauptfenster",0085,0007,0120,0020)
hFont% = @Create("Font","MS Sans Serif",16,0,1,0,0)
Sendmessage(Text1&,$0030,hFont%,0)
BUTTON1& = CREATE("BUTTON",%HWND,"Einstellungen",0010,0040,0120,0030)
BUTTON2& = CREATE("BUTTON",%HWND,"Information",0140,0040,0120,0030)
BUTTON3& = CREATE("BUTTON",%HWND,"Start",0010,0080,0080,0030)
BUTTON4& = CREATE("BUTTON",%HWND,"Hilfe",0095,0080,0080,0030)
BUTTON5& = CREATE("BUTTON",%HWND,"Beenden",0180,0080,0080,0030)
|
| | | | WinXP Prof, XProfan 9.1 Newbie
Ein kluger Kopf sagte mal:
"Nach dem derzeitigen Stand der Technik ist es unmöglich Programme zu schreiben, die fehlerfrei laufen!" | 22.05.2006 ▲ |
| | |
| |  | | | | | | | |
| |
Hubert
Binnewies | | Yo blanco....tener Yo auch intenta....aber irgendwo irgendetwas falso gemacht...Yo hatte todavía siempre el selben effekt...Yo glaube Yo lass lo así...el funktioniert... |
| | | | WinXP Prof, XProfan 9.1 Newbie
Ein kluger Kopf sagte mal:
"Nach dem derzeitigen Stand der Technik ist es unmöglich Programme zu schreiben, die fehlerfrei laufen!" | 22.05.2006 ▲ |
| | |
| | 
Frank
Abbing | El sicherste Método es wohl, cada Control una Font zuzuweisen, si esta verschiedene Fonts bekommen debería. Etwa así:
KompilierenMarcaSeparaciónfont& = @Create("Font","MS Sans Serif",13,0,0,0,0)
...
knopf&=@CreateButton(%hwnd,"Knopf",0,0,80,20)
SetFont knopf&,font&
...
DeleteObject |
| | | | | | |
|
RespuestaThemeninformationenDieses Thema ha 3 subscriber: |
(931)
Deutsch
English
Français
Español
Italia