Ich weiß natürlich nicht, wie das alles bei dir heißt, aber es sollte verständlich sein.
Die Tatsache, dass das ein komisches Prog ist ist ja nicht relevant
Delphi-Quellcode:
var
Kosten:Real;
If kleinePizza.Checked then Kosten:=1,50; // 3 Radiobuttons - Pizzagröße
If mittlerePizza.Checked then Kosten:=2,30;
If grossePizza.Checked then Kosten:=3;
if Thunfisch.Checked then Kosten:=Kosten+0,30; // 5 Chechboxen - Belag
if Ei.Checked then Kosten:=Kosten+0,40;
if Salami.Checked then Kosten:=Kosten+1;
if Käse.Checked then Kosten:=Kosten+0,50;
if Gold.Checked then Kosten:=Kosten+5016;
EditKosten.Text:=FloatToStr(Kosten)
Für Fortgeschrittene: Ich weiß, dass "+0,40" nicht sinnvoll ist, aber es verdeutlicht den Geldbetrag besser
Dein Titel ist nicht sehr aussagekräftig. Für spätere Suchende solltest du ihn vielleicht ändern.