|
Registriert seit: 1. Nov 2007
89 Beiträge
|
Re: Allgemeine Fragen zu Delphi
18. Nov 2007, 19:00
hmm ok danke ich weiß mckinzler mag das nicht aber hat nich doch zu irgendwer lust mir folgende mthode zu schreiben?
"Ein Baumarkt liefert bei Entfernungen unter 5km für 10€, darüber für 5€ Festpreis plus 1€ je gefahrenem Kilometer, jedoch höchstens 30€ Gesamtkosten. Zustellungen weiter als 50km werden nicht vorgenommen.
Schreiben Sie Delphi-Code für die Methode BerechnePreis, die in der booleschen Variablen ok vermerken soll, ob die Lieferung erfolgen kann, und in diesem Falle in lieferpreis : integer den Preis ablegt.
procedure TForm1.BerechnePreis(entfernung : Integer);
begin
"
|