AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Text drucken

Ein Thema von Luckie · begonnen am 3. Jun 2006 · letzter Beitrag vom 4. Jun 2006
Antwort Antwort
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#1

Text drucken

  Alt 3. Jun 2006, 23:46
Ich habe einen unbestimmt langen Text. Und ich habe die Breite des Papiers in Milimetern. Jetzt müsste ich den Text in einzelne Zeilen zerlegen, so dass ich ihn mit der API Funktion TextOut in einer Schleife ausdrucken kann. Mit GetTextExtentPoint bekomme ich die Breite eines Strings. Aber ich müsste die Breite vorgeben und dann die Anzahlzeichen bekommen, die dort reinpassen. (Und am Besten noch bis zum letzten Leerzeichen, da ich nicht mitten im Wort umbrechen will.)

Hat da jemand eine Idee, wie man das machen könnte?
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von Mystic
Mystic

Registriert seit: 18. Okt 2003
Ort: Flerzheim
420 Beiträge
 
Turbo Delphi für Win32
 
#2

Re: Text drucken

  Alt 3. Jun 2006, 23:49
Bei Schriftarten mit variabler Zeichenbreite hilft glaube ich nur Ausprobieren (Den Umbruchpunkt solange verschieben bis die Zeile aufs Papier passt).
Jan Steffens
Der Fachwortgenerator - 100% Schwachsinn --- Der UPnP Router Manager - Kommentare erwünscht!
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#3

Re: Text drucken

  Alt 3. Jun 2006, 23:51
Puh, das wollte ich eigentlich vermeiden. Aber im Moment, sehe ich auch keine andere Lösung.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von Mystic
Mystic

Registriert seit: 18. Okt 2003
Ort: Flerzheim
420 Beiträge
 
Turbo Delphi für Win32
 
#4

Re: Text drucken

  Alt 3. Jun 2006, 23:57
Ich glaub ich hab was gefunden. Schau dir mal MSDN-Library durchsuchenGetTextExtentExPoint an.
Jan Steffens
Der Fachwortgenerator - 100% Schwachsinn --- Der UPnP Router Manager - Kommentare erwünscht!
  Mit Zitat antworten Zitat
Benutzerbild von sniper_w
sniper_w

Registriert seit: 11. Dez 2004
Ort: Wien, Österriech
893 Beiträge
 
Delphi 6 Enterprise
 
#5

Re: Text drucken

  Alt 4. Jun 2006, 00:22
Siehe auch DrawText
Katura Haris
Es (ein gutes Wort) ist wie ein guter Baum, dessen Wurzel fest ist und dessen Zweige in den Himmel reichen.
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es 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

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 20:50 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz