Seite 1 von 1

Fontattribute aus FontID ermitteln

Verfasst: 28.04.2006 15:16
von ts-soft
Ich möchte aus der FontID, die von PB bei LoadFont() zurückgegeben wird,
die Attribute ermitteln. Also Fontnamen, Size usw.
Hat da jemand eine Lösung?

Verfasst: 28.04.2006 15:37
von Macros
Ich habe mal rumexperimentiert, aber die Font ID ändert sich immer wieder,
auch wenn man genau die gleichen Parameter gibt.

Ich glaube die Attribute lassen sich nicht auslesen :(

Verfasst: 28.04.2006 15:43
von ts-soft
Ist doch ein OS-Handle, bzw. ein Pointer auf eine OS-Structure
So ungefähr stehts in der Hilfe. Wenn es eine Structure ist, wäre es ja
einfach, ich müßte diese nur kennen!

Verfasst: 29.04.2006 00:44
von ABBKlaus
Vielleicht hilf dir das ja weiter :allright:

Code: Alles auswählen

LoadFont(1,"Arial",18)

If OpenWindow(0,0,0,222,200,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"Test") And CreateGadgetList(WindowID(0))
  
  DC=GetDC_(WindowID(0))
  UseFont(1)
  SelectObject_(DC,FontID())
  If DC
    If GetTextMetrics_(DC,TM.TEXTMETRIC)
      Debug TM\tmHeight
      Debug TM\tmAscent
      Debug TM\tmDescent
      Debug TM\tmWeight
    EndIf
    Buf$=Space(255)
    If GetTextFace_(DC,255,@Buf$)
      Debug Buf$
    EndIf
  EndIf
  
  Repeat
  Until WaitWindowEvent()=#PB_Event_CloseWindow
EndIf

Verfasst: 29.04.2006 00:49
von ts-soft
ABBKlaus hat geschrieben:Vielleicht hilf dir das ja weiter :allright:
Danke, das gesuchte gefunden :allright: