Delphide Veri tabanina Kayit Ekleme ve Silme

Delphide Veri tabanina Kayit Ekleme

Bir önceki makalemizde Delphide Access veritabanina baglanmayi anlatmistik. Bu örnegimizde 1 tane Adoconnection,Adotable,DataSoruce ve Dgrid ekleyin. Veri tabanizdaki alanlar kadar Dbedit kullanin Dbeditlerin Properties'ten Datasoruce özeliklerini DataSoruce1 yapiniz ve  DataField özeligini ise veri tabanindaki alanlarla iliskilendirmesini yapiniz.Veri kaydetmek içinde 1 tane buton form ekleyiniz.

procedure TForm1.Button1Click(Sender: TObject);
begin
     ADOTable1.Edit ;
     ADOTable1.Post ;
end;

Seçilen Veriyi Silme :

Örnegimizde 1 tane Adoconnection,Adotable,DataSoruce ve Dgrid ekleyiniz. Veri silmek  içinde 1 tane buton forma ekleyiniz.

procedure TForm1.Button1Click(Sender: TObject);
var a:integer;
begin
     a:=Application.MessageBox('Seçilen veriyi silmek istediginizden Emin misiniz ?','Uyari',MB_YesNo);
     if a=idyes then Adotable1.Delete;
end;

  Yukaridaki örnek seçili veri üzerindeyken button tikladiginiz zaman karsimiza mesaj gelecek Evet tusuna basilirsa veri silicektir.

Yazan :

Başlık :

Tarih :

Sorununuz :

Güvenlik Kodu :