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

Thema durchsuchen

Ansicht

Themen-Optionen

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

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

Vorheriger Beitrag

Nächster Beitrag

Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge

Delphi XE3 Enterprise

#10

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

2. Feb 2013, 07:50

zusammenfalten · markieren

Delphi-Quellcode:

			var

 i:Integer;

 sum:Double;

begin

   sum := 0;

   if RadioButton1.checked then

      begin

         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;

end;

wobei der Zugriff über eigene Listen oder Array mit den Komponenten flotter wäre.

Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)