Nur das größte Ergebnis wird angegeben (Rechner mit Checkbox und Radiobox)

Thema durchsuchen

Ansicht

Themen-Optionen

Ein Thema von ItsMe1 · begonnen am 1. Feb 2013 · letzter Beitrag vom 2. Feb 2013

Antwort

Seite 2 von 2

musicman56

(Gast)

n/a Beiträge

#11

AW: Nur das größte Ergebnis wird angegeben (Rechner mit Checkbox und Radiobox)

2. Feb 2013, 18:36

zusammenfalten · markieren

Delphi-Quellcode:

			var

  i:Integer;

  sum:Double;

 begin

  sum := 0;

  if RadioButton1.checked then

  for I := 1 to 4 do

  if TCheckBox(FindComponent('Checkbox' + IntToStr(i))).Checked 

  then Sum := Sum + StrToFloat(TEdit(FindComponent('Edit' + IntToStr(i))).Text);

  Label7.Caption := FloatToStr(sum);

 end;

Ich würde es lieber so machen, weil sonst Label7 eine "alte" Summe anzeigt, wenn keine Checkbox markiert ist.