rm2 :: Button2Click (TObject * Sender)
{-> Show (); -> Hide ();
}
{-> Filtered = false; (Edit1-> Text == "")
{-> Filter = "";
}
{(RadioButton1-> Checked) -> Filter = "[Найменування] like '%" + Edit1-> Text + "%'";
} -> Filtered = true;
}
// ---------------------------------------- -----------------------------------
// ---------------------------------------- -----------------------------------
# include
# pragma hdrstop
# include "Unit3.h"
# include "Unit1.h"
// ---------------------------------------- -----------------------------------
# pragma package (smart_init)
# pragma resource "*. dfm" * Form3;
// ---------------------------------------- -----------------------------------
__fastcall TForm3 :: TForm3 (TComponent * Owner)
: TForm (Owner)
{
} __fastcall TForm3 :: DBGrid1TitleClick (TColumn * Column)
}
{-> Show (); -> Hide ();
}
// ---------------------------------------- -----------------------------------
// ---------------------------------------- -----------------------------------
# include
# pragma hdrstop
# include "Unit1.h"
# include "Unit2.h"
# include "Unit5.h"
// ---------------------------------------- -----------------------------------
# pragma package (smart_init)
# pragma resource "*. dfm" * Form5;
// ---------------------------------------- -----------------------------------
__fastcall TForm5 :: TForm5 (TComponent * Owner)
: TForm (Owner)
{
}
{-> Show (); -> Hide ();
}
{-> Show (); -> Hide ();
}
// ---------------------------------------- -----------------------------------
// ---------------------------------------- -...