Forum | | | | Hubert Binnewies | allô zusammen..
je hab là un Prob avec den Fonts...
j'ai folgendes Hauptfenster: KompilierenMarqueSéparationWINDOWSTYLE 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>
avec cela habe je zwar ne belle fette Überschrift, mais qui Text sur den Buttons ist aussi Fett, quoi unschön ist.
eh bien habe je versucht den Code so abzuändern: KompilierenMarqueSéparationWINDOWSTYLE 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)
cela blöde ist seulement: Mach je inem Unterfenster un Multiedit sur wird qui Schrift Fett, et berühre je seulement avec dem Mauszeiger qui Buttons im Hauptfenster wird aussi là qui Schrift wieder Fett. quoi fais je faux???? |
| | | 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 | Tricolore déjà selber rausbekommen..... KompilierenMarqueSéparationWINDOWSTYLE 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 | je weiss....hab je aussi versucht....mais irgendwo irgendetwas faux gemacht...je hatte encore toujours den selben effet...je crois je lass es so...cela 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 | qui sicherste Methode ist wohl, chaque Contrôle une Font zuzuweisen, si cet verschiedene Fonts bekommen devoir. Etwa so: KompilierenMarqueSéparationfont& = @Create("Font","MS Sans Serif",13,0,0,0,0)
...
knopf&=@CreateButton(%hwnd,"Knopf",0,0,80,20)
SetFont knopf&,font&
...
DeleteObject |
| | | | |
|
répondreOptions du sujet | 726 Views |
Themeninformationencet Thema hat 3 participant: |