запис?" + s + "?"). c_str (),
"Підтвердіть зміни", _YESNO + MB_ICONQUESTION) == IDYES)
{-> Edit (); N_r-> AsString = EN_r-> Text; Naz_r-> AsString = ENaz_r-> Text; N_g-> AsString = EN_g-> Text; Naz_g-> AsString = ENaz_g-> Text; Naz_st-> AsString = ENaz_st-> Text; Soder-> AsString = ESoder-> Text; Kodeks-> AsString = CDKodeks-> Text;
}
}
}
{-> Insert ();
}
{
if (Application-> MessageBox (
"Дійсно хочете видалити запис?",
"Підтвердіть рішення",
MB_YESNO + MB_ICONEXCLAMATION) == IDYES)
Table2-> Delete ();
}
{> Close ();
}
// ---------------------------------------- -----------------------------------
Текст програми для форми FF
# include
# pragma hdrstop
# include "UGL.h"
# include "UF.h"
// ---------------------------------------- -----------------------------------
# pragma package (smart_init)
# pragma resource "*. dfm" * FF;
// ---------------------------------------- -----------------------------------
__fastcall TFF :: TFF (TComponent * Owner)
: TForm (Owner)
{
}
{(RGF-> ItemIndex == 0) -> Filtered = false;
}
}
}
{(RGF-> ItemIndex == 0) -> Filtered = false;
}
}
{(RGF-> ItemIndex == 0) -> Filtered = false;
}
}
}
}
{> Close ();
}
{
}
// ---------------------------------------- -----------------------------------
Текст п...
