Forum: Sonstige Fragen zu Delphi
by TERWI,
18. Dez 2017
.... und noch ein UpDate:
Gestern beim herumspielen mit TPrintPreview (arbeitet mit TCustomRichEdit) ist mir plötzlich aufgefallen, das RichEdit offensichtlich doch einen Seitenumbruch beherscht - allerdings nur via Control '\page' und NICHT per '\pagebb'.
Zur Erinnerung:
... ich wollte mit LibreOffice erstellte Seiten auch so wie generiert mit Seitenumbruch anzeigen/drucken.
LO baut...
Forum: Sonstige Fragen zu Delphi
by TERWI,
17. Dez 2017
Ein Update:
Das mit den Zeilen löschen war ja schon recht praktikabel, aber wenn mann im (Source-) RE vergisst, das WordWrap abzustellen, geht das richtig in Hose.
Neue und bessere Idee:
Ich lösche nun im RE.Text betreffende Textstellen.
Hier mal ein Auszug aus meinem Test-Prog in Verbindung mit TPrintPreview:
// -----------------------------------------------------------------------------...
Forum: Sonstige Fragen zu Delphi
by TERWI,
12. Dez 2017
... es geht noch einfacher, besser und universeller.
Ein'\page' oder '\pagebb' steht immer irgendwo mit anderen Steuerzeichen vor dem Text, der auf die nächste Seite soll.
Ich ersetze nun einfach diese Steuerreichen mit einem Text (hier: '|NEWPAGE|'), der auch anschließend im RTF lesbar am Anfang der Zeike steht.
Anschließend loope ich alle Zeilen im Richedit und prüfe auf eben diesen Text....
Forum: Sonstige Fragen zu Delphi
by TERWI,
11. Dez 2017
Wie hab ich's nun gemacht:
Global verwende ich 3x TRichEdit - RE_SRC hält den Source (aus zu ladender Datei), RE_TMP ist für temporäre Suche und RE_PAGE bekommt den zu druckenden RTF-Inhalt.
Aus RE_SRC hole ich mir den Plain-Text via Stream. Darin suche ich erst einmal das Key-Wort '\page', um die Pos. des 1. Seitenumbruch im Source zu suchen.
Kleiner Nebeneffekt: Der TRichEdit-Parser hat ne...
Forum: Sonstige Fragen zu Delphi
by TERWI,
10. Dez 2017
HEUREKA :bounce1:
Ich hab's elemtar auf dem Schirm :witch:
... JA: auch Delphi's TRichEdit kennt so was wie '\page'' ! Wertet das nur nicht wirklich aus (gibt es aber 'weiter')...
Bevor ich euch meine Bastelei zeige, muss ich dass alles noch ein bischen in eine begreifbare Reihe bringen. Nach nunmehr > 48 Stunden ununterbochenem Hard-Learning & Heavy-Coding in Sachen RTF brauche ich etwas...
Forum: Sonstige Fragen zu Delphi
by TERWI,
9. Dez 2017
... hab mal die JVCL_Master gezogen - sind ja NUR 51 MB, entpackt 220 MB. Das tue ich mir erst mal nicht an ...
Da werde ich mich dann wohl mal selbst auf den Weg machen und die RTF-Abgründe erforschen und einen kleinen Parser dazu basteln. Interessante Lektüre dazu
Angedachte Vorgehensweise:
- RTF im Source nach \page* durchsuchen
- Zugehörige Zeile ermitteln
- Im RE bis dahin in Temp-RE...
Forum: Sonstige Fragen zu Delphi
by TERWI,
9. Dez 2017
Ne ne, als Editor (schon gar nicht Wysiwyg) betrachte ich das nicht. Ich will hier ja keinen basteln, sondern feritge RTFs nutzen.
Was mich stört ist, das man lediglich (in TPrintPreview 'RichTextDemo') mitbekommt, wann der zu druckende Text eben nicht mehr auf den Druckbereich passt und dadurch erst dann eine neue Seite generiert wird. Das ist zwar schon sehr schön, aber eben nur die halbe...
Forum: Sonstige Fragen zu Delphi
by TERWI,
9. Dez 2017
Korrekt erkannt: Siehe Quelltext in #3. Das sind 3 Seiten, auf jeder steht nur jeweils 'page..'. Der Seitenumbruch wurde in LibreOffice mit Strg-Enter erzeugt (geht in Word genau so).
Es soll nun auch genau so gedruckt werden, wie das RTF in LO angezeigt wird - also hier 3 Seiten mit jeweils nur einer Zeile.
Auch wenn ich das 'per Hand' selber rendere und auf PDF24 drucke, habe ich keinen...
Forum: Sonstige Fragen zu Delphi
by TERWI,
8. Dez 2017
Ich bastle hier grade an einem Tool, in dem vorgefertige RTFs u.a. als Hilfe-Anzeige genutzt werden sollen, bzw. um eigene RTFs (Formulare) programmintern erstellt und alle gedruckt werden sollen.
Vorgefertigte Texte erstelle ich mit LibreOffice - da hab ich meinen Seiten-Umbruch...
Wie erkenne ich aber diese nach laden ins Proggie ?
Auch diese sonst so tolle Komponente TPrintPreview...
