ich verändere, während der Laufzeit, den Font der Anwendung mit
Code: Alles auswählen
oDlgMain:SetFont(oFont)
Code: Alles auswählen
::oStatPB := XbpStatic() :new( ::drawingArea, , { 0, StatbarHigh+2 }, {aSize[1]-8, 41} , aPresParam )
::oStatPB:type := XBPSTATIC_TYPE_GROUPBOX
::oStatPB:ClipChildren := .F.
// jetzt die einzelnen Buttons
::makeButton(aPresParam)
...
INLINE METHOD makeButton(aPresParam)
::oPB01 := XbpPushButton():new( ::oStatPB, , { 4,2}, {76,32}, aPresParam )
::oPB01:caption := "F1"
::oPB01:tabStop := .T.
::oPB01:activate := {|mp1, mp2, obj| ::ToDeskTop() }
::oPB02 := XbpPushButton():new( ::oStatPB, , { 82,2}, {76,32}, aPresParam )
...
RETURN self
Die Frage ist nun : wie geht man "richtig" vor damit die der Font "überall" gleich ändert ?