Delphi Text drucken - Delphi-PRAXiS

Thema durchsuchen

Ansicht

Themen-Optionen

Text drucken

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

Vorheriger Beitrag

Nächster Beitrag

Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge

Delphi 2006 Professional

Text drucken

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.