Fontsize

[Squdus]

möp möp

Ich habe folgendes Problemen.

Ich arbeite gerade an einem Textverarbeitungsprogramm. Bisher klappt alles mehr oder weniger wunderbar, der commondialog macht was ich will, ich lass mir die Schriftarten in einer Combobox auf der Form anzeigen etc.
Nur die Schriftgrößen machen mir jetzt noch zu schaffen.
Ich habe natürlich schon bei "About VB" geguckt und mir den Code dort angeguckt. Nur zu taugern scheint er irgendwie nichts.
Könnte mir da jemand bitte mal erklären wie das gehen soll?
Ich möchte einfach nur die tatsächlich zur Verfügung stehenden Schriftgrößen ener Schriftart in einer Combobox auf der Form angezeigt bekommen.

 

[VBMichi]

Hallo Squdus,

du kannst in die ComboBox die Zahlen von 2 bis 100 hinzufügen.
Jede Schriftart ist in diesem Größen-Interval verfügbar. Lediglich Word verbietet es (aus welchen Gründen auch immer).

Hab es eben ausprobiert:
Eine Schriftart die in Word mit nur 72 verfügbar ist, ist in einer RTB in VB mit Schriftgröße 100 auch deutlich größer.

Die Schriftgröße setzt du dann wie gewohnt mit:

RichTextBox1.SelFontSize = Val(Combo2.Text)

Grüße,
Michi

 

[Squdus]

Schon klar. Aber das wollte ich ja gerade nicht.
Ich hatte vor das in der Combobox der gleiche Interval wiedergegeben wird, wie er auch im Commondialog angegeben wird. Also 8, 10, 12, 14, 18, 24 oder 8, 9, 10, 11, 12, 14, 16, 18, 20, 22, 24, 26, 28, 36, 48, 72 etc. pp.
Das TVP soll sich halt so ähnlich wie möglich wie Word bzw. Wordpad verhalten.

Aber danke