Exemplo n.º 1
0
//---------------------------------------------------------------------------
void __fastcall TShowItObjInfosForm::cbItemsClick(TObject *Sender)
{
  FormCreate(0);
}
Exemplo n.º 2
0
//-----------------------------------------------------------------------
void __fastcall Ttandr::clearClick(TObject *Sender)
{
 Memo1->Clear();
 rmemo->Clear();
 FormCreate(Sender);
}