Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Druckerschleife


Desert Storm - Do 15.12.05 18:02
Titel: Druckerschleife
Ich hab ne TStringList und möchte die drucken. Hab das mit ner repeat Schleife probiert. Klappt aber nicht, weil dann ne Fehlermeldung von Windows kommt, dass mein Programm eine Schutzverletzung gemacht hat. Wahrscheinlich is die Schleife zu schnell. Wie kann ich das ändern?
MFG


Desert Storm - Do 15.12.05 19:38

Ich hab noch ne Frage. Wie kann ich den Text, den ich drucken will, um 90° drehen. Wegen Querformat.
MFG


pRoTeUs - Do 15.12.05 19:53

Hi,

wenns mit ner Repeatschleife ned will machs halt so:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
var i: Integer;
begin
  for i:= 0 to StringList1.Count-1 do
  begin
     // Zeile Drucken...
  end;
end;


Und das mit dem um 90^drehen macht er automatisch wenn du die PageOrientation auf Querformat stellst.


Delphi-Quelltext
1:
2:
3:
Printers.Orientation := poLandscape;

// Oder poPortrait für vertikalen Ausdruck, poLandscape für horizontalen Ausdruck


mfg
proteus