Dataset sorunu

[muradguzel]

arkadaşlar dbnavigatorden silem işlemi yapıyorum siliyor fakat çalışma ekranından çıkp tekrar programı çalıştırdığımda silinen alanlar tekrar geliyor veri tabanı kısmına yansımıyor kodları veriyorum yardımcı olursanız seviniriz.

procedure TForm4.DbEgitimAfterDelete(DataSet: TDataSet);
begin
id:=DbPersonelSICIL_NO.AsString;
//IBTransaction1.Commit;
//dbpersonel.Open;
//dbegitim.Open;
//dbegitimekle.Open;
//dbegitmen.Open;
//dqgenel.Open;
DbPersonel.Locate('sicil_no',id,[loCaseInsensitive,loPartialKey]);

end;

procedure TForm4.DbEgitimAfterInsert(DataSet: TDataSet);
begin
DbEgitimSICIL_NO.AsInteger := DbPersonelSICIL_NO.AsInteger;
id:=DbPersonelSICIL_NO.AsString;
DbPersonel.Locate('sicil_no',id,[loCaseInsensitive,loPartialKey]);
end;

procedure TForm4.DbEgitimAfterPost(DataSet: TDataSet);
begin
id:=DbPersonelSICIL_NO.AsString;
IBTransaction1.Commit;
DbPersonel.Open;
DbPersonel.Locate('sicil_no',id,[loCaseInsensitive,loPartialKey]);
DbEgitim.Open;
dqGenel.Open;
dbegitmen.Open;
dbegitimekle.Open;

end;

[Query]

Slm

Yaptığın her kayıt ve silme işleminden sonra mutlaka CommitRetaining yapmalısın ki veritabanına işlesin.

Kod: Tümünü seç

IBTransaction1.CommitRetaining

[muradguzel]

a.s hocam sağolsın ama olmadı kayıdı siliyor fakat aynı ekrana geldiğimde formu kapatıp tekrar açtığımda kayıtlar geliyor.

[Fatih!]

Büyük ihtimalle datasetin DeleteSQL'i boş ya da sorunludur. Ayrıca aktif kayda ulaşmak için locate yerine bookmark kullanmanızı öneririm.

[Query]

Doğru Transaction ı commit ettiğine emin ol birden fazla varsa eğer ...

[muradguzel]

hocam deletesql kısmı dolu bookmark nasıl kullanılır o şekilde yapayım.

[muradguzel]

delete ve insert olaylarında bütün datasetleri açayım mı?