Foro | | | | | 
Hubert
Binnewies | Hallo zusammen..
Ich hab da ein Prob mit den Fonts...
Ich habe folgendes Hauptfenster:
KompilierenMarkierenSeparierenWINDOWSTYLE 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 habe ich zwar ne schöne fette Überschrift, aber der Text auf den Buttons ist auch Fett, was unschön ist.
Nun habe ich versucht den Code so abzuändern:
KompilierenMarkierenSeparierenWINDOWSTYLE 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(Text1&,$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 ist nur:
Mach ich inem Unterfenster ein Multiedit auf wird die Schrift Fett, und berühre ich nur mit dem Mauszeiger die Buttons im Hauptfenster wird auch da die Schrift wieder Fett.
Was mache ich 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 schon selber rausbekommen.....
KompilierenMarkierenSeparierenWINDOWSTYLE 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 | | Ich weiss....hab ich auch versucht....aber irgendwo irgendetwas falsch gemacht...ich hatte noch immer den selben effekt...ich glaube ich lass es so...das 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 | Die sicherste Methode ist wohl, jedem Control einen Font zuzuweisen, wenn diese verschiedene Fonts bekommen sollen. Etwa so:
KompilierenMarkierenSeparierenfont& = @Create("Font","MS Sans Serif",13,0,0,0,0)
...
knopf&=@CreateButton(%hwnd,"Knopf",0,0,80,20)
SetFont knopf&,font&
...
DeleteObject |
| | | | | | |
|
AnswerThemeninformationenDieses Thema hat 3 subscriber: |
(490)
Deutsch
English
Français
Español
Italia