79 lines
2.7 KiB
C++
79 lines
2.7 KiB
C++
//---------------------------------------------------------------------------
|
|
|
|
#ifndef MySQL_ADOH
|
|
#define MySQL_ADOH
|
|
//---------------------------------------------------------------------------
|
|
#include <Classes.hpp>
|
|
#include <Controls.hpp>
|
|
#include <StdCtrls.hpp>
|
|
#include <Forms.hpp>
|
|
#include <ADODB.hpp>
|
|
#include <Db.hpp>
|
|
#include <DBGrids.hpp>
|
|
#include <Grids.hpp>
|
|
#include <DBTables.hpp>
|
|
#include <ExtCtrls.hpp>
|
|
#include "mySQLDbTables.hpp"
|
|
//---------------------------------------------------------------------------
|
|
class TForm1 : public TForm
|
|
{
|
|
__published: // IDE-managed Components
|
|
TADOConnection *ADOConnection1;
|
|
TDataSource *DataSource1;
|
|
TDBGrid *DBGrid1;
|
|
TADOTable *ADOTable1;
|
|
TSplitter *Splitter1;
|
|
TButton *Button1;
|
|
TDBGrid *DBGrid2;
|
|
TDataSource *DataSource2;
|
|
TTable *Table1;
|
|
TButton *Button2;
|
|
TDatabase *Database1;
|
|
TQuery *Query1;
|
|
TUpdateSQL *UpdateSQL1;
|
|
TADOQuery *ADOQuery1;
|
|
TStringField *Query1name;
|
|
TStringField *Query1owner;
|
|
TStringField *Query1species;
|
|
TStringField *Query1sex;
|
|
TDateField *Query1birth;
|
|
TDateField *Query1death;
|
|
TIntegerField *Query1id;
|
|
TAutoIncField *ADOQuery1id;
|
|
TStringField *ADOQuery1name;
|
|
TStringField *ADOQuery1owner;
|
|
TStringField *ADOQuery1species;
|
|
TStringField *ADOQuery1sex;
|
|
TDateField *ADOQuery1birth;
|
|
TDateField *ADOQuery1death;
|
|
TStringField *ADOTable1name;
|
|
TStringField *ADOTable1owner;
|
|
TStringField *ADOTable1species;
|
|
TStringField *ADOTable1sex;
|
|
TDateField *ADOTable1birth;
|
|
TDateField *ADOTable1death;
|
|
TAutoIncField *ADOTable1id;
|
|
TmySQLDatabase *mySQLDatabase1;
|
|
TmySQLTable *mySQLTable1;
|
|
TStringField *mySQLTable1name;
|
|
TStringField *mySQLTable1owner;
|
|
TStringField *mySQLTable1species;
|
|
TStringField *mySQLTable1sex;
|
|
TDateField *mySQLTable1birth;
|
|
TDateField *mySQLTable1death;
|
|
TLargeintField *mySQLTable1id;
|
|
void __fastcall ADOTable1RecordChangeComplete(
|
|
TCustomADODataSet *DataSet, const TEventReason Reason,
|
|
const int RecordCount, const Error *Error,
|
|
TEventStatus &EventStatus);
|
|
void __fastcall Button1Click(TObject *Sender);
|
|
void __fastcall Button2Click(TObject *Sender);
|
|
private: // User declarations
|
|
public: // User declarations
|
|
__fastcall TForm1(TComponent* Owner);
|
|
};
|
|
//---------------------------------------------------------------------------
|
|
extern PACKAGE TForm1 *Form1;
|
|
//---------------------------------------------------------------------------
|
|
#endif
|