Schachtsteuerung

[U. Rupprecht]

Hallo,

ich habe folgendes Problem:

Während eines Listendruckes wechsel ich den Einzugsschacht von Oberer Kassette auf Untere Kassette (funktioniert ganz gut). Wird danach aus einem anderen Programm gedruckt (z.B. Word), so zieht der Drucker aus dem unteren Papierschacht an. Wenn ich jedoch zum Abschluß der Liste den Ursprungsschacht zurücksetzte bekomm ich eine leere Seite.

Wie kann ich nun den Schacht wechseln ohne eine Seite zu generieren ?

Thx im voraus.

uwe

[Branco Wassmuth]

Hallo Uwe,

bekommst Du die leere Seite aus WinWord oder aus Deinem Listendruck ?
Wie änderst Du den Schacht ? Änderst Du die PRINTER_INFO_2 - Struktur ?
Erklär mal genauer was und wie Du es machst.

Branc

[U. Rupprecht]

Ich schalte den Schacht via DEVMODE-Struktur und Reset(DC). Das Problem liegt wohl daran, das ich den Schacht am Ende des Listendruckes nicht wieder zurücksetze, da ich ansonsten eine Leerseite durch meinen Listendruck bekomme (Enddoc kommt nach dem umschalten des Schachtes).

Vieleich mal ein Beispiel:

Function SchachtWechsel(schacht:Integer);
begin
Devmode^.dmDefaultsource := schacht;
RESETDC(DC);
end;

Begin
BeginDoc;
Liste; //Mit Schachtwechsel
SchachtWechsel(Ursprungsschacht);
EndDoc;
end

[Branco Wassmuth]

Hallo Uwe,

schau doch mal unter diesem link nach:
"Hilfe Andreas Kosch & Co.: PRINTER_INFO_2 unter NT"
(Entwickler Forum\Delphi\Drucken)

In der ersten Antwort von Andread Kosch steht ein Beispiel, was Dir evtl. weiterhelfen sollte.

Branc