Inoffizielles deutsches Xbase-Forum

Hallo,

es handelt sich um ein Programm, das auf einem XbpDialog() aufbaut und mit GUI=YES und LINK_FLAGS=/PM:PM erstellt wurde.

Code: Alles auswählen

   oFont := XbpFont():new()
   oFont:familyName := "Lucida Console Standard"
   // oFont:height := 16
   // oFont:width := 8
   oFont:create()

Nach dem Ausführen von :create() ist der FamilyName "MS Sans Serif", nehme ich den Kommentar vor den beiden Zeilen mit den Grössenangaben weg, bekomme ich "Arial" als Font.

Ich habe es auch mit :generic := .F. und :vector := .F. und :antiAliased := .F. versucht, keine Änderung.

Bei mir heißt das nur "Lucida Console"

Hallo, Hubert -

habe ich beides ausprobiert, mit dem gleichen Ergebnis. Bei mir in der Systemsteuerung heisst die Schriftart "Lucida Console Standard".

Aber egal, welche Schriftart ich versuche, ich lande immer wieder bei "Arial" oder "MS Sans Serif".

Ich habe dieses Beispiel abgeändert:

...\XPPW32\source\samples\basics\font // je nach Version anderer Grundpfad

Code: Alles auswählen

// HB Lucida Console
   oFont := XbpFont():new( oPS ):create( "26.Lucida Console" )
   GraSetfont( oPS, oFont )
   GraStringAt( oPS, {20,20}, "Lucida Console" ) // HB

   msgbox("Test HB: >"+oFont:familyName+"<")

Rückgabe ...

: LucidaConsole.png (32.04 KiB) 4061 mal betrachtet

Eventuell passen deine Höhe und Breite nicht, ich nutze immer die Punktangabe Syntax

Das Andere Programm im Verzeichnis, speichert alle Fonts in einer DBF ...

Inoffizielles deutsches Xbase-Forum

XbpFont() - habe ich da etwas verpasst?

XbpFont() - habe ich da etwas verpasst?

Re: XbpFont() - habe ich da etwas verpasst?

Re: XbpFont() - habe ich da etwas verpasst?

Re: XbpFont() - habe ich da etwas verpasst?