Hey, also ich würde eine if - Anweisung aufstellen..wenn das bis 10 kg geht nimm tarif 1 usw.
Das hatte ich im folgendem probiert, bevor ich mich hierher gewendet habe:
Delphi-Quellcode:
function tarif(gewicht:real):byte;
begin
if gewicht<=10 then
gewicht:=1 else
if (gewicht>10) and (gewicht<=20) then
gewicht:=2 else
if (gewicht>20) then
gewicht:=3
...aber wie Delphi mir selbst schon sagt, scheint das totaler mist zu sein
..der Rauskommende Wert soll ja vom Typ Byte sein, also eine Zahl ?
UND:..in der Procedure Ausgabe1 und Ausgabe2 kommt ja z.b. vor: "gebuehr:5:2"...was hat es plötzlich mit den Zahlen auf sich?^^
Sorry, wenn die Fragen zu doof sind
LG