edit'lerin toplamı

[rainman9]

selamlar
30 adet edit' teki bilgileri toplayacagım
her birisini tek tek yazmak yerine FOR döngüsü ile yapmak daha kolay olacak sanırım ama nasıl?
var
i:integer ;
al,toplam:double;
begin
toplam:=0 ;
for i:=1 to 3 do begin
al:=strtofloat('edit'+floattostr(i)+'.text');
toplam:=toplam+al;

olmuyor yardımcı olursanız sevinirim
teşekkürler

[mrmarman]

Merhaba...

- FindComponent ile bunu yapabilirsin. Forumda bu keyword ile arat lütfen...

[pentiumkivanc]

Bu şekilde olmaz ancak FindComponent diye arama yaptırın birsürü örnek çıkacak karşınıza