|
1-Loyiha ADOTable yordamida bog’lash.
2-loyiha ADOQery yordamida bog’lash
3-loyiha ADOQery yordamida bog’lash, bazadagi ma’lumotlarni taxrirlash.
4-loyiha ADOTable1 yordamida bog’lash, bazadagi ma’lumotlarni taxrirlash.
Dastur kodi
#include
#pragma hdrstop
#include "Unit4.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
void __fastcall TForm1::Malumotqoshish1Click(TObject *Sender)
{
ADOTable1->Insert();
Form2->Show();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Malumotniozgartirish1Click(TObject *Sender)
{
ADOTable1->Edit();
Form2->Show();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Malumotniochirish1Click(TObject *Sender)
{
switch(MessageDlg("Ma`lumotingizni aniq o`chirmoqchimisiz ?", mtInformation, mbYesNoCancel,0))
case mrYes: ADOTable1->Delete();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Chiqish1Click(TObject *Sender)
{
Form1->Close();
}
//----------------------------------------------
void __fastcall TForm2::BitBtn1Click(TObject *Sender)
{
Form1->ADOTable1->Post();
Form2->Close();
}
5-loyiha ADO texnologiyasidan foydalanib ma’lumotlarni taxrirlash.
| 