Ich habe ein Problem in meiner Programmierung. UNd zwar weiß ich nicht wie ich jetzt den bruttowert ausgeben soll!
Am besten ebe ich euch den Quellcode.
Delphi-Quellcode:
procedure TForm2.RadioGroup1Click(Sender: TObject);
var bruttowert, nettowert, p: integer;
begin
nettowert := strtoint (edit2.text);
case RadioGroup1.ItemIndex of
0: bruttowert := nettowert * 1;
1: bruttowert := nettowert * (7/100) + nettowert ;
2: bruttowert := nettowert + (19/100) + nettowert ;
else
p := strtoint (edit1.Text);
3: bruttowert := nettowert * (p/100) + nettowert ;
end;
panel1.Text := inttostr (bruttowert
end;
end;
So!! Wo steckt der fehler?
[edit=Matze][delphi]-Tags gesetzt. MfG, Matze[/edit]