moin
Ich schreibe gerade ein Programm das Matheaufgaben mit den Grundrechenarten ausspucken soll. Aufgabeerstellung klappt 1A. nun will ich die Aufgabe 4 Spaltig drucken. Zu diesem Zweck will ich mit Canvas auf den "Drucker malen". Hab zu Testzwecken das mal auf mein Form gemalt sonst wären ja 1000 Seiten draufgegangen
. Auf meiner Form funktioniert das Einwandfrei und schaut optimal aus. Wenn ich aber nun genau das gleiche auf den Drucker male druckt der irgendwie nur sch**** aus.(Links oben auf dem Blatt ein paar Zahlen übereinander geschrieben). Woran kann das liegen?
hab das mal zur übersichtlichkeit etwas vereinfacht: Die ganzen Aufgaben stehen in der Listbos "l".
Delphi-Quellcode:
cnt := 0;
While ( i < 800 ) Do
Begin
if cnt <= l.Count - 1 then//Wenn der Counter nicht die ListbosItems übersteigt
begin
Canvas.TextOut(0,i,l.Items.Strings[cnt]);//Bzw. Printer.Canvas
Inc(cnt);
Inc(i, 15);//Nur zum Ausrichten
end
else
break;
End;