| |
| |
|
Uwe
''Pascal''
Niemeier | Hi Leute, hallo Roland!
Mir ist gerade aufgefallen, daß beim profanen TreeView("InsertItem"..) per das betroffene TreeView automatisch der mit SetDialogFont eingestellte Font aktiv gesetzt wird, unabhängig davon, ob man vorher dem Tv einen eigenen Font zugewiesen hat:
window 500,500
usefont "MS Sans Serif",15,0,0,0,0
setdialogfont 1
$H commctrl.ph
var Tv&=create("TreeView",%hwnd,0,50,10,400,400)
setfont Tv&,create("Font","Arial",0,0,1,1,1)
struct TV = Parent&,InsertAfter&,Mask&,Item&,State&,StateMask&,Text&,TextMax&,Icon1&,Icon2&,Children&,Data&,Text$(100)
declare Tv#:dim Tv#,TV
Tv#.Mask&=~TVIF_TEXT | ~TVIF_IMAGE | ~TVIF_SELECTEDIMAGE | ~TVIF_CHILDREN | ~TVIF_STATE
Tv#.State&=~TVIS_EXPANDED
Tv#.Statemask&=~TVIS_EXPANDED
Tv#.Text&=Tv#+48
Tv#.TextMax&=100
Tv#.Text$="Eintrag per TvMessage"
sendmessage(Tv&,~TVM_INSERTITEM,0,Tv#)
sleep 1000
TreeView("InsertItem",Tv&,0,0,"Eintrag per InsertItem")
waitinput
Das erscheint mir wenig sinnvoll, weil man im Zweifelsfall vor jedem InsertItem den Dialogfont ab- und danach wieder einschalten müßte, un den eigenen Font zu behalten...
SeeYou
Pascal |
|
| |
| |
| |
|
|
RGH | Hallo Pascal,
das passiert aber nur, wenn SetDialogFont 1 gesetzt ist! Wozu setzt Du ihn auf 1, wenn Du dem Dialog eh' mit SetFont einen eigenen Font zuweist?
Unabhängig davon, sollte naturalmente ein InsertItem niocht den Font verändern ... ich schaue mal ...
Saluto
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 26.01.2011 ▲ |
|
| |
|
|
RGH | Ok, da war eine Zeile zu viel im Code. Die fliegt noch 'raus.
Saluto
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 26.01.2011 ▲ |
|
| |
|
|
Uwe
''Pascal''
Niemeier | Hi Roland!
das passiert aber nur, wenn SetDialogFont 1 gesetzt ist! Wozu setzt Du ihn auf 1, wenn Du dem Dialog eh' mit SetFont einen eigenen Font zuweist?
Für die restlichen und alle noch folgenden Bedienungselemente außer dem Tree, damit ich die nicht alle mit SetFont bearbeiten muß...
Ok, da war eine Zeile zu viel im Code. Die fliegt noch 'raus.
SeeYou
Pascal |
|
| |
| |
| |
|
(266)
Deutsch
English
Français
Español
Italia