Protokolldrucker mit delphi 6

mc_eddy · Hält's aus hier Beiträge: 11

Hallo, ich würde mit einem Traktordrucker gerne einen Protokolldrucker Realisieren.

Vorgestellt habe ich mir das ca. so :

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

if not printer.Printing then begin
        printer.PrinterIndex:=unit3.druckerindex;
        AssignPrn(PrintText);
        Rewrite(PrintText);
        end;


if printer.Printing then
begin
Writeln(PrintText, form1.Memo1.text);
end;

->Jede neue Zeile Sollte SOFORT ausgegeben werden, bisher macht der drucker nur das, wenn
a: sein Puffer voll ist,
b: ich den befehl zum ausgabe ende gebe ->zusätzlich wird dann aber auch noch ein Seitenvorschub durchgeführt.

Kann mann das irgendwie verhindern ?.

Gruß
Markus

p.s. ich entwickle unter CLX, da meine AW irgendwann mal unter linux laufen sollte

Moderiert von raziel: Delphi-Tags hinzugefügt.

BenBE · Verfasst: Di 12.07.05 10:52

Windows nutzt für jegliche Druckerausgaben einen sog. Schreibcache. Wenn Du diesen leeren möchtest, um die Daten sofort an den Drucker zu senden, geht dies über den Flush-Befehl (Jup. Einfach an der Spülung ziehen ;-)

). Wie der bei TP-Style genau heiß weiß ich aber ATM nicht, da ich solch aldmodische Dateiausgabe nicht nutze.

_________________

Anyone who is capable of being elected president should on no account be allowed to do the job.
Ich code EdgeMonkey - In dubio pro Setting.

maxk · Verfasst: Di 12.07.05 11:20

Ich denke, dass der einfach Flush(PrintText); heißt

@mc_eddy: Bitte demnächst für Quellcodes die [delphi]-Tags benutzen..

_________________
Ein Computer wird das tun, was Du programmierst - nicht das, was Du willst.

mc_eddy · Hält's aus hier Beiträge: 11

Hi,

erstmal danke.
Also das mit Flush(PrintText); ->leuft leider nicht,

->selber effekt wie vorher auch,hmmm

mal schaun ob ich noch was anderes finde.

Gruß
Markus

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme