AÇIKLAMA

Bu program C++ Builder ile Mysql'e bağlanarak veri ekleme ve silme işlemlerine örnek teşkil etmektedir. C++ Builder programı içerisinden Mysql'e bağlanabilmeniz için  Mydac bileşenini indirip kurmanız gerekmektedir. Bileşeni C++ Builder'i açmadan kurun. Daha sonra C++ Builder'i çalıştırın.

Programın Bağlandığı Tablo:

"uyegirisi" veritabanı içindeki "uyeler" tablosudur.Öncelikle Mysql içindeki data klasörü içinde "uyegirisi" isimli bir veritabanı klasörü oluşturmanız gerekmektedir.Akabinde ekteki tabloyu kullanarak yada kodlardan yardım alarak "uyeler" isimli tabloyu oluşturup "uyegirisi" isimli veritabanı klasörüne koymanız gerekmektedir.

Bileşen içerisindeki nesnelerin özelliklerini ve yapmanız gereken ayarların detaylarını Burdan izleyebilirsiniz.

Programda ekleme işlemi farklı Append ve Post fonksiyonları ile yapılmıştır. Bu işlemlerle yapılan kayıt dosyanın sonuna eklenir. Silme işleminde ise Ad kısmına girilen ifade tabloda bulunursa ilgili kayıtlar silinir.Bu yapı tckimlik numarasına göre yapılıp gerçek anlamda özel bir kayıtı silmeniz sağlanabilir.

Kullanılan Tabloyu Aşağıdaki Linkten İndirebilirsiniz.

Linki Görebilmeniz İçin Üye Olmanız Gerekmektedir...

Üye Kayıt

Programın Tamamını Aşağıdaki Linkten İndirebilirsiniz

Linki Görebilmeniz İçin Üye Olmanız Gerekmektedir...

Üye Kayıt

Program Kodu:

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "DBAccess"
#pragma link "MemDS"
#pragma link "MyAccess"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
if((Edit1->Text!="")&&(Edit2->Text!="")&&(Edit3->Text!="")&&(Edit4->Text!="")&&(Edit5->Text!="")&&(Edit6->Text!=""))
{
 
MyTable1->Active=true;
MyTable1->Append();
MyTable1->FieldValues["tckimlikno"]=Edit1->Text;
MyTable1->FieldValues["ad"]=Edit2->Text;
MyTable1->FieldValues["soyad"]=Edit3->Text;
MyTable1->FieldValues["eposta"]=Edit4->Text;
MyTable1->FieldValues["telno"]=Edit5->Text;
MyTable1->FieldValues["adres"]=Edit6->Text;
MyTable1->Post();
MyTable1->Active=false;
Edit1->Text="";
Edit2->Text="";
Edit3->Text="";
Edit4->Text="";
Edit5->Text="";
Edit6->Text="";
}
else
Application->MessageBox("Lütfen Bütün Alanları Doldurunuz","UYARI",MB_ICONINFORMATION);
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::BitBtn2Click(TObject *Sender)
{
String sql="Delete from uyeler where ";
sql+="ad='";
sql+=Edit2->Text;
sql+="'";
MyTable1->SQL->Clear();
MyTable1->SQL->Add(sql);
MyTable1->Execute();
Edit2->Text="";
}
//---------------------------------------------------------------------------