Einzelnen Beitrag anzeigen

BadenPower

Registriert seit: 17. Jun 2009
616 Beiträge
 
#3

AW: Quickreport, Seitenumbruch selber einfügen

  Alt 22. Jul 2015, 08:42
Mindestens 2 der 3 Klammern sind überflüssig. Ansonsten: Top
Alles Geschmackssache.

Ich hätte auch 3 Klammernpaare, allerdings anderst verteilt, wenn die 2 if's notwendig wären:

Delphi-Quellcode:
 if ((zqry_W.RecordCount - zqry_W.RecNo) < 5) then
  begin
   if (qckrp1_Re.AvailableSpace < 300) then
    begin
     qckrp1_Re.newpage;
    end;
   end;
Mit einer if-Abrage hätte ich sogar 4:

Delphi-Quellcode:
 if (((zqry_W.RecordCount - zqry_W.RecNo) < 5) and (qckrp1_Re.AvailableSpace < 300)) then
  begin
   qckrp1_Re.newpage;
  end;
Programmieren ist die Kunst aus Nullen und Einsen etwas sinnvollen zu gestalten.
Der bessere Künstler ist allerdings der Anwender, denn dieser findet Fehler, welche sich der Programmierer nicht vorstellen konnte.
  Mit Zitat antworten Zitat