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.
Kategoriler : Delphi
Webbilgileri.com' da bilgilerinizi paylaşmak istiyorsanız.
Ders Ekle linkmizi kullanabilirsiniz.
0 Adet Yorum Bulunmaktadır.
Makale hakkındaki yorumlarınız ?