Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Suche Methode um txt Dateien formatiert auszudrucken (https://www.delphipraxis.net/184666-suche-methode-um-txt-dateien-formatiert-auszudrucken.html)

daniel775 13. Apr 2015 12:17

Suche Methode um txt Dateien formatiert auszudrucken
 
Hallo Forengemeinde!

Wer kann mir ein paar Anhaltspunkte für eine Suche bzw. vielleicht sogar Tips geben um eine im FileStream generierte Datei formatiert an den Standarddrucker zu schicken.
Letzteres bekomme ich hin. Also eine Datei an den Standarddrucker zu schicken und auszudrucken.
Nur leider ist dieser Text halt im Standardformat bzw. in der Standardschriftgröße.

Ich hab mal nach PostScript bzw. Printer Command Language gesucht, find das aber recht kompliziert. Gibt es da eine einfachere und elegantere Variante?

Wenn ich eine Datei drucke, die folgendes beinhaltet:

Code:
%!
/Courier findfont   % Schrift auswählen
36 scalefont        % auf Schriftgröße 20 skalieren
setfont             % zum aktuellen Zeichensatz machen
50 50 moveto        % (50, 50) als aktuelle Schreibposition setzen
(Hallo Welt!) show  % und dort den Text ausgeben
showpage            % Seite ausgeben
Dann druckt er leider das so wie es da oben steht und nicht "Hallo Welt!" in Schriftgröße 36.

Gruß

mm1256 13. Apr 2015 13:30

AW: Suche Methode um txt Dateien formatiert auszudrucken
 
Man könnte einen RTF-Header vorne am Text anbringen und dann als RTF drucken

Perlsau 13. Apr 2015 13:31

AW: Suche Methode um txt Dateien formatiert auszudrucken
 
Du könntest z.B. in ein TRichEdit ausgeben und das dann drucken.

Mikkey 13. Apr 2015 14:51

AW: Suche Methode um txt Dateien formatiert auszudrucken
 
Wenn der Drucker das versteht, was in der Datei drinsteht, kannst Du den Inhalt mit "Escape()" zum Drucker schicken.

Ich habe aber nicht die geringste Ahnung, ob das mit aktuellen Windossen noch funktioniert, das letzte Mal, dass ich sowas verwendet habe, war Windows-98 oder 2000.

himitsu 13. Apr 2015 14:58

AW: Suche Methode um txt Dateien formatiert auszudrucken
 
Man baut sich einen Interpreter für diese Befehlssyntax, lässt ihn auf diesen Text los und gibt die Befehle "übersetzt" an Printer.Canvas weiter.

daniel775 13. Apr 2015 15:45

AW: Suche Methode um txt Dateien formatiert auszudrucken
 
Danke für die Antworten.

@perlsau:
Im TRichedit kann ich aber kein Formatierungen machen, oder?

@himitsu:
Hört sich interessant an. Hast du mal ein kleines Beispiel für mich? Sozusagen als
Gedankenanregung.
Meinst du einen Interpreter für eigens definierte Befehle oder für bestehende?

Gruss

Popov 13. Apr 2015 15:50

AW: Suche Methode um txt Dateien formatiert auszudrucken
 
Zitat:

Zitat von daniel775 (Beitrag 1297535)
Im TRichedit kann ich aber kein Formatierungen machen, oder?

Gerade da.

DeddyH 13. Apr 2015 15:51

AW: Suche Methode um txt Dateien formatiert auszudrucken
 
Zitat:

Zitat von daniel775 (Beitrag 1297535)
@perlsau:
Im TRichedit kann ich aber kein Formatierungen machen, oder?

Doch, das ist ja der große Vorteil eines RichEdit gegenüber z.B. einem Memo.

himitsu 13. Apr 2015 15:52

AW: Suche Methode um txt Dateien formatiert auszudrucken
 
RichEdit = Memo (MultiLine-Edit) mit Formatierungen
http://de.wikipedia.org/wiki/Rich_Text_Format
https://www.google.de/search?q=riche...w=1920&bih=938


Einen Interpreter für die Befehle, welche du da oben gezeigt hast.
Ist das ein eigenes Format, dann wirst du dir den selber bauen müssen.
Ist es ein "bekanntes" Format, dann könnte es auch schon was Fertiges geben.

daniel775 13. Apr 2015 16:34

AW: Suche Methode um txt Dateien formatiert auszudrucken
 
Ich danke euch. Ich guck mir das nachher mal an.


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:55 Uhr.
Seite 1 von 2  1 2      

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