Forum: Sonstige Fragen zu Delphi
Delphi
by Hawkeye219,
29. Apr 2006
Pseudo-Code ist ein sehr wirksames Mittel gegen Strukturfehler im Programm. Bei größeren Programmen hilft es, den Ablauf zunächst im Pseudo-Code zu formulieren. Dann muß man "nur" noch alle Anweisungen in sauberen Delphi-Code übersetzen.
Zu deiner Frage nach dem Namen des Dokuments: Printer.Title sollte hier helfen. Wichtig ist es, diese Eigenschaft vor Printer.BeginDoc zu setzen. Man findet...
Forum: Sonstige Fragen zu Delphi
Delphi
by Hawkeye219,
29. Apr 2006
Ich habe lediglich deinen Code als Pseudo-Code formuliert, weil ich dir damit die Fehlersuche etwas erleichtern wollte.
Gruß Hawkeye
Forum: Sonstige Fragen zu Delphi
Delphi
by Hawkeye219,
28. Apr 2006
Ok Jannik, der Code ist nun schon etwas lesbarer geworden. Wenn du diesen Thread liest, wirst du sehen, daß es sehr viele unterschiedliche Meinungen zum Thema "Formatierung von Quelltexten" gibt. Letztlich orientieren sich die meisten doch mehr oder weniger an den unverbindlichen Vorgaben von Borland. In diesen Vorgaben findest du noch viele Hinweise, wie du die Lesbarkeit deines Codes weiter...
Forum: Sonstige Fragen zu Delphi
Delphi
by Hawkeye219,
28. Apr 2006
Den Fehler solltest du eigentlich sofort sehen, wenn du deinen Code vernünftig einrückst. :wink:
In dem linksbündigen Listing übersiehst du allzu leicht logische Fehler im Ablauf.
Gruß Hawkeye
Forum: Sonstige Fragen zu Delphi
Delphi
by Hawkeye219,
28. Apr 2006
Die Steuerung der Ausgabe über die Variable lines in deinem Code stimmt wohl noch nicht ganz. Offensichtlich druckst du auch den Header ("Auszahlungen") für jeden Datensatz erneut aus. Diesen Code solltest du aus der Schleife herausziehen und den Header nur 1x pro Seite drucken.
Vielleicht ist es besser, die ausgegebenen Datensätze pro Seite mitzuzählen und beim Erreichen des gewünschten...
Forum: Sonstige Fragen zu Delphi
Delphi
by Hawkeye219,
28. Apr 2006
Ich habe mit den Datenbank-Komponenten noch nicht gearbeitet. Laut Hilfe gibt es die Eigenschaft Eof. Wäre es damit nicht einfacher?
table3.First;
while not table3.eof do
begin
// hier Datensatz verarbeiten
table3.next;
Forum: Sonstige Fragen zu Delphi
Delphi
by Hawkeye219,
28. Apr 2006
und wenn du zwei Zeilen deines Codes entfernst?
begin
Lines := 900;
table3.First;
printer.BeginDoc;
repeat
// Druckbefehle
Forum: Sonstige Fragen zu Delphi
Delphi
by Hawkeye219,
28. Apr 2006
Hallo Jannik,
hast du es schon mal mit TPrinter.NewPage versucht?
Gruß Hawkeye