Druckerschleife

Desert Storm · Beiträge: 39

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 · Beiträge: 39

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

pRoTeUs · Beiträge: 47 Windows XP prof Delphi 2005 prof

Hi,

wenns mit ner Repeatschleife ned will machs halt so:

markieren

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.

markieren

Delphi-Quelltext

1:
2:
3:

Printers.Orientation := poLandscape;

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

mfg
proteus

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme