 |
 |
 |
 |
 |
|
Programmierung allgemein
GUI-Design mit VCL / FireMonkey / Common Controls
Delphi Zeichenbreite verändern
Registriert seit: 16. Sep 2004 Ort: NRW 72 Beiträge Delphi XE4 Professional |
#1
Zeichenbreite verändern
9. Feb 2006, 12:08
Hallo Leute!
Ich möchte die Zeichenbreite eines Windows-Fonts verändern, finde aber nirgendwo Informationen dazu. Um Mißverständnissen vorzubeugen: Ich möchte nur die Breite verändern! Hab das früher schon mal in GFA-BASIC (Kennt das außer mir noch jemand?  ) geproggt. Das ging so:
Code:
Danach konnte man z.B. mittels
GETFONT SYSTEM_FONT
FONT "times",HEIGHT 24,WIDTH 10,WEIGHT 800,FAMILY FF_SWISS, QUALITY 2, PITCH FIXED_PITCH TO fnt_13& FONT "times",HEIGHT 24,WIDTH 12,WEIGHT 800,FAMILY FF_SWISS, QUALITY 2, PITCH FIXED_PITCH TO fnt_12& FONT "times",HEIGHT 24,WIDTH 23,WEIGHT 800,FAMILY FF_SWISS, QUALITY 2, PITCH FIXED_PITCH TO fnt_14&
Code:
diesen Font benutzen. Mittels
SETFONT fnt_13&
Code:
konnte man den Font löschen und den Speicher dann wieder freigeben. Die fnt_xx& sind dabei die Font-Handles für Windows.
FREEFONT fnt_13&
Geht sowas auch unter Delphi? THX Jürgen
Der weiß, daß er nichts weiß, wie alle anderen auch nichts wissen.
Nur weiß er, was die anderen und auch er selbst noch lernen müssen. (Novalis 1772 - 1801) |
Zitat
|
ForumregelnEs ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.
BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus. Trackbacks are an
Pingbacks are an
Refbacks are aus
|
|
Baum-Darstellung
