[Delphi] Dodawanie w kolumnie

0

Problem:
Musze zrobić program, w którym będą w kolumnie w editach wpisane liczby i program ma je do siebie dodać.
Pytanie:
Wiem jak to zrobić, ale czy nie dało by się jakoś szybciej (tych editów będzie ok 900 :))??? Np. umieściłbym na Panelu 1 kolumnę i jakimś poleceniem jej zawartość by się dodała :).
Prośba:
Proszę mederatorów o nieusuwanie tego posta (tak jak mojego poprzedniego), szukałem na forum, w wyszukiwarce i w artykułach, ale nic nie znalazłem. A poza tym jak sformułować mój problem zeby forumowa wyszukiwarka go znalazła ???? Naprawdę nie wiem

0

U mnie zadziałało cos takiego
Umieść wszystkie edity na komponencie GroupBox
Liczyć możesz w ten sposób:

var
  i,sum:integer;
begin
  sum:=0;
  for i:=0 to GroupBox1.ControlCount-1 do
    begin
      if GroupBox1.Controls[i] is TEdit then
        with GroupBox1.Controls[i] as TEdit do
          sum:=sum+StrToInt(Text);
    end;
  Label1.Caption:=IntToStr(sum);
0

A idzie tak zrobić z Panelami ???

1 użytkowników online, w tym zalogowanych: 0, gości: 1