Создать базу данных с использованием StringGrid

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
const int m=100;
struct btrud
{ char data [10];
char family [20];
char name [20];
char otchestvo [20];
char spetsial [10];
int zarplata [20];
char sity [20];
char pol [3];
char yearrogdenia [10];
char obrazovanie [20];
char language [20];
int telephon [20];
int dom [5];
char ulitsa [20];
};
class birgatrud
{
private:int n;
btrud *px;
void udal(int j);
public:
birgatrud(){}
~birgatrud(){if (n>0)delete[]px;}
int k;
 
 
};
btrud mas[100];
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
 
 
void __fastcall TForm1::N2Click(TObject *Sender)
{
 
StringGrid1->Cells[1][0]="Фамилия";
StringGrid1->Cells[2][0]="Имя";
StringGrid1->Cells[3][0]="Отчество";
StringGrid1->Cells[7][0]="Пол";
StringGrid1->Cells[8][0]="Год рождения";
 
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
StringGrid1->Cells[1][0]="Фамилия";
StringGrid1->Cells[2][0]="Имя";
StringGrid1->Cells[3][0]="Отчество";
StringGrid1->Cells[7][0]="Пол";
StringGrid1->Cells[8][0]="Год рождения";
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::N9Click(TObject *Sender)//очистить БД
{
for (int i=0;i<StringGrid1->ColCount;i++)
for (int j=0;j<StringGrid1->RowCount;j++)
StringGrid1->Cells[i][j]="";
StringGrid1->Cells[1][0]="Фамилия";
StringGrid1->Cells[2][0]="Имя";
StringGrid1->Cells[3][0]="Отчество";
StringGrid1->Cells[7][0]="Пол";
StringGrid1->Cells[8][0]="Год рождения";
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::N7Click(TObject *Sender)//добавить строку в StringGrid1
{
StringGrid1->RowCount=StringGrid1->RowCount+1;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::N8Click(TObject *Sender)
{
StringGrid1->RowCount=StringGrid1->RowCount-1;
}
//---------------------------------------------------------------------------
 
 
void __fastcall TForm1::N13Click(TObject *Sender)
{
StringGrid1->Options
<< goEditing // разрешить редактировать
<< goTabs; // <Tab> - переход к следующей ячейке
}
//-------------------------------------------------------------------------