//--------------------------------------------------------------------------- void __fastcall TShowItObjInfosForm::cbItemsClick(TObject *Sender) { FormCreate(0); }
//----------------------------------------------------------------------- void __fastcall Ttandr::clearClick(TObject *Sender) { Memo1->Clear(); rmemo->Clear(); FormCreate(Sender); }