Kod: Tümünü seç
DMoyunKaydet.ADOQuerySave.SQL.Clear;
DMoyunKaydet.ADOQuerySave.SQL.Add('select * from tblOyunlar where ID='+IntToStr(OyunId1));
DMoyunKaydet.ADOQuerySave.Open;
//ve puanları göndermeye başlayalım
for i:=1 to 21 do //f1;
begin
if DMoyunKaydet.ADOQuerySave.fieldbyname('OyP'+IntToStr(i)).value =null then Break;
if DMoyunKaydet.ADOQuerySave.fieldbyname('OyP'+IntToStr(i)).value <>null then begin
Gpuan:=DMoyunKaydet.ADOQuerySave.fieldbyname('OyP'+IntToStr(i)).value ;
//if Gpuan='' then Break;
//if Gpuan='-'then Gpuan:='99';
gelenPuan:=StrToInt(Gpuan);
Frame1PuanlamaDagitim;
end;
end;
hücreleri integer yaptım olmadı string yaptım olmadı
dolu olunca sıkıntı yok
nerde hata yapıyorum acaba
saygılarımla