Thema: Delphi Text drucken

Einzelnen Beitrag anzeigen

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