Mysql da kredi sistemi...

[seci20]

ustalarım merhaba mysqlda kredi sistemini nasıl yapabilirim mesela mehmet=10 kredi istediğim işlemi yaptıktan sonra 9 kredi olucak her işlem yaptığında 1 kredi düşücek.sumu araştırdım site dahil ama bir türlü çıkarma işlemini başaramadım.veya ben yanlıs yonde ilerliyorum.kodları böyle yazıyorum.

Kod: Tümünü seç

MyQuery1.Close;
MyQuery1.SQL.Clear ;
MyQuery1.SQL.Add ( ' UPDATE personel SET kredi=''kredi''  '''+edit1.text+''''+' where kredi=''-5''') ;
MyQuery1.execsql;

ama sadece -5 yazarsa textin içine yazdığım sayıyı düşüyor.
yada böyle yazıyorum.

Kod: Tümünü seç

MyQuery1.close;
MyQuery1.sql.Clear;
MyQuery1.sql.Add('SELECT personel, personel -2 FROM kredi');
MyQuery1.open;
edit1.text:=inttostr(MyQuery1.FieldByName('personel').AsInteger);

bu seferde yaptığını söylüyor ama yapmıyor.
bide böyle yazıyorum.

Kod: Tümünü seç

procedure TForm1.Button3Click(Sender: TObject);
var
s,s1,s2:Real;
begin
s1:=StrToFloat(Edit3.Text);
s2:=MyQuery1.SQL.Add('select * from personel where kredi=');
s:=s1-s2;
Label2.Caption:='=' + FloatToStr(s);
end;

buda yaptığını söylüyor ama yapmıyor ya ben yanlış yerden gidiyorum yada yazdığım kod baştan sona hata.yardımcı olabilirseniz çok sevinirim.veritabanı hakkında pek bir bilgim olduğu söylenemez.

[thelvaci]

UPDATE komutunun nasıl çalıştığını en kısa sürede anlamanızı önereceğim size.

Kod: Tümünü seç

  UPDATE Tablo
  SET Alan = Alan -1
  WHERE
    Kosul = X

gibi kullanabilirsiniz.