Yardım!! DBGRİD SUTUNLARDAKİ EŞİTLERİ TOPLAMA

[Lost Soul]

Yukarıdaki hata mesajını olmayan bir kayıt adına ulaşmaya çalıştığı için veriyor.

burada
Case Tabloa.FieldByName('tablo'+IntToStr(i)).Asinteger of
tablo yazdığınız yere tablo adı değil kayıt adını girmeniz gerekiyor.

Eğer resimde gösterdiğiniz 1 de 10' kadar (Öncekinde 1 de 31'e kadardı) olan ayıt alanları
örneğin aşağıdaki gibi ise

ALAN1
ALAN2
ALAN3
ALAN...
.....

O zaman tablo yazan yere ALAN + InttoStr(i) yazmanız gerekiyor.

ve ayrıca eğer alan sayısı 10 ise o zaman

for i := 1 to 31 do
yerine
for i := 1 to 10 do

yazmanız gerekmektedir.

son olarak sıfırlara 0 birlere 1 ikilere 2 yzmışsınız. bu değişkenler sayaç görevi görüyor o yüzden hepsine 0(sıfır) yazmalısınız