Preiskalkulation
Es ist ein anwenderfreundliches Delphiprogramm zu erstellen, mit welchem man den Nettoverkaufspreis einer Ware kalkulieren kann.
Nach der Eingabe der einzelnen Werte für die Kalkulation (Einkaufspreis, Lieferrabatt, Zieleinkaufspreis, Liefererskonto, Bareinkaufspreis, Bezugskosten, Einstandspreis, Handlungskosten, Selbstkosten, Gewinn, Barverkaufspreis, Kundenskonto, Vertreterprovision, Zielverkaufspreis, Kundenrabatt) sollen durch einen Klick auf einen Schalter alle Zwischenergebnisse und der Nettoverkaufspreis errrechnet und angezeigt werden.
Durch einen Klick auf einen anderen Schalter sollen alle Werte wieder zurück gesetzt werden können.
|
|
| Komponente |
Eigenschaft |
Wert |
Bemerkungen |
| Form1 |
Caption |
‘Preiskalkulation’ |
Überschrift in der Kopfleiste des Programmfensters |
| Edit1 bis Edit9 |
Text |
'Zahl' |
Anfangswerte für die Eingaben |
| Edit10 |
Text |
'0' |
Anfangswert für die Ausgabe des Nettopreises |
| Label1 bis Label56 |
Caption |
'Namen', '0' oder 'Einheit' |
Bezeichnungen für Größen und Einheiten |
| Button1 |
Caption |
'berechnen' |
Aufschrift auf dem Schalter |
| OnClick |
'Button1Click' |
Prozedur, die beim Klicken ausgeführt werden soll:
einlesen Werte, berechnen der Zwischenergebnisse, ausgeben der Ergebnisse |
| Button2 |
Caption |
'Neustart' |
Aufschrift auf dem Schalter |
| OnClick |
'Button2Click' |
Prozedur, die beim Klicken ausgeführt werden soll:
zurücksetzen der Text-Eigenschaften der Eingabefelder und der Caption-Eigenschaften der Ausgabe-labels |
| BitButton1 |
Kind |
'Close' |
Auswahl der Buttonart |
| Caption |
'Schließen' |
Aufschrift auf dem Schalter |
| OnClick |
'BitButton1Click' |
Prozedur, die beim Klicken ausgeführt werden soll:
Beenden des Programms und Schließen des Fensters |
|
| Lösung |
|
|
|
|