Вопрос: Как определить родительскую форму известного TControl (TEdit,TButton и т.п.)?

Ответ :

code:
--------------------------------------------------------------------------------
TMyForm* __fastcall GetControlParent( TControl* AControl )
{
   TCustomForm* AForm = GetParentForm( AControl ) ;
   if( AForm == NULL )
   {
     ShowMessage( AnsiString( "Control \"" + AControl->Name + "\" hase no parent form!" ;
     return NULL ;
   }
   return dynamic_cast( AForm ) ;
}
--------------------------------------------------------------------------------





	

Электронные Книги по компьютерным программам
На правах рекламы:
Логин
Пароль
Запомнить меня