maas alanına zam yapma(delphi)

[facia_018]

arkadaslar sabahtan buyana içinden çıkamadım,sorunun mantıgını anladım ancak dbgride yazdıramadım.
bir form oluşturdum.1tane dbgrid nesnemiz 1 tane butonumuz ve 1 tane editimiz mevcut.
ad soyad ve maas alanlarının oldugu bir veritabanıyla bağlantısı yaparak çalıştırdım programı gayet güzel çalışıyor.
ancak şöle bir sorum var sizlere program çalıştıktan sonra;
edit nesnesinin içeriğine herhangi bir sayı girdiğimizde,örneğin 20 girilip butona bastıgımızda tüm maaslara %20 zam yapıcak ,bunu görebilcem yani dbgrid üzerinde.
saygılar...

[cemaliozan]

hesaplanan alan (calculated field) kullanabilirsin. Tablo için hangi DataSet nesnesini kullanıyorsan (ClientDataSet,TTable,TQuery, TZQuery,AdoTable,AdoQuery vs.) yeni bir hesaplanan alan ekle. Dataset nesnesinin CalcFields olayına aşağıdaki gibi bir kod yazabilirsin...

PHP Kodu:

procedure TForm1.Table1CalcFields(DataSet: TDataSet);
begin
  sonmaas := maas + ((StrToInt(Edit1.Text) * maas)  div 100);
end; 


gibi...