Полю не присвоено значение по умолчанию

#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
 
void __fastcall TForm2::SpeedButton1Click(TObject *Sender)
{
Form2->Close();
Form1->Close();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm2::SpeedButton2Click(TObject *Sender)
{
   Form2->Close();
Form1->Show();
    
}
//---------------------------------------------------------------------------
 
void __fastcall TForm2::BitBtn1Click(TObject *Sender)
{
    if(RadioButton1->Checked)
 {
  ADODataSet1->Close();
 ADODataSet1->CommandText =
      "SELECT * FROM заказчики  ORDER BY  Фамилия";
 ADODataSet1->Open();}
   if(RadioButton2->Checked)
 {
  ADODataSet1->Close();
 ADODataSet1->CommandText =
      "SELECT * FROM заказчики ORDER BY №_паспорта";
 ADODataSet1->Open();}
 if(RadioButton3->Checked)
 {
  ADODataSet1->Close();
 ADODataSet1->CommandText =
      "SELECT * FROM заказчики ORDER BY Код_заказчика";
 ADODataSet1->Open();}
}
//---------------------------------------------------------------------------
 
void __fastcall TForm2::BitBtn2Click(TObject *Sender)
{
   if(RadioButton4->Checked)
 {
  ADODataSet2->Close();
 ADODataSet2->CommandText =
      "SELECT * FROM Фирма_исполнитель ORDER BY  Название";
 ADODataSet2->Open();}
   if(RadioButton7->Checked)
 {
  ADODataSet2->Close();
 ADODataSet2->CommandText =
      "SELECT * FROM Фирма_исполнитель ORDER BY город";
 ADODataSet2->Open();}
 if(RadioButton10->Checked)
 {
  ADODataSet2->Close();
 ADODataSet2->CommandText =
      "SELECT * FROM Фирма_исполнитель ORDER BY Код_фирмы";
 ADODataSet2->Open();}  
}
//---------------------------------------------------------------------------
 
void __fastcall TForm2::BitBtn3Click(TObject *Sender)
{
   if(RadioButton5->Checked)
 {
  ADODataSet3->Close();
 ADODataSet3->CommandText =
      "SELECT * FROM заказ ORDER BY  Дата_заказа";
 ADODataSet3->Open();}
   if(RadioButton8->Checked)
 {
  ADODataSet3->Close();
 ADODataSet3->CommandText =
      "SELECT * FROM заказ ORDER BY Выполнить_до";
 ADODataSet3->Open();}
 if(RadioButton8->Checked)
 {
  ADODataSet3->Close();
 ADODataSet3->CommandText =
      "SELECT * FROM заказ ORDER BY №_заказа";
 ADODataSet3->Open();}      
}
//---------------------------------------------------------------------------
 
void __fastcall TForm2::BitBtn4Click(TObject *Sender)
{
         if(RadioButton6->Checked)
 {
  ADODataSet4->Close();
 ADODataSet4->CommandText =
      "SELECT * FROM работа ORDER BY  [стоимость работы] ";
 ADODataSet4->Open();}
   if(RadioButton9->Checked)
 {
  ADODataSet4->Close();
 ADODataSet4->CommandText =
      "SELECT * FROM работа ORDER BY [стоимость деталей]";
 ADODataSet4->Open();}
 if(RadioButton12->Checked)
 {
  ADODataSet4->Close();
 ADODataSet4->CommandText =
      "SELECT * FROM работа ORDER BY [№ заказа]";
 ADODataSet4->Open();}
}
 
//---------------------------------------------------------------------------
 
void __fastcall TForm2::Timer1Timer(TObject *Sender)
{
  static String InitialCaption = Caption;
    Caption = Caption.SubString(2, (Caption.Length() - 1));
 
    if(!Caption.Length())
      Caption = InitialCaption; 
}