Forum: Software-Projekte der Mitglieder
by Fritzew,
22. Dez 2016
Schon besser,
schau Dir mal das hier im Anhang an. Habe es mal etwas umgebaut.
War nur auf die Schnelle aber vielleicht gibt es Dir ein paar Ideen.
Ach ja MwSt für Privatkunden inclusive. Sollte da nicht umgekehrt gerechnet werden?
Forum: Software-Projekte der Mitglieder
by Fritzew,
21. Dez 2016
Hallo
Also ganz ehrlich? Nein :)
Du hast immer noch zuviel Logik im Formular.
z.B:
Kinokarten.setAnzK1(strtoint(EAnzK1.text));
if Kinokarten.Karten > (ord(frPlR1Vorg)) then
Forum: Software-Projekte der Mitglieder
by Fritzew,
21. Dez 2016
Hallo
nahpets hat ja schon einiges genannt,
wenn Du jetzt noch "alle" Berechnungen in Deine Kinoklasse bringst, wird es schon besser.
Also diese Zeilen:
Kinokarten.ZwSu:=Kinokarten.PreisR + Kinokarten.PreisR + Kinokarten.PreisR;
Kinokarten.MWSt:=Kinokarten.ZwSu * MWSt;
Kinokarten.Preis:=Kinokarten.ZwSu+Kinokarten.MWSt;
Berechnungen gehören in die Klasse und...