void TGroup::setData(void *rec) { size_t i = 0; if (last!= 0) { TView *v = last; do { v->setData((char *)rec + i); i += v->dataSize(); v = v->prev(); } while (v != last); } }
ushort execDialog( TDialog *d, void *data ) { TView *p = TProgram::application->validView( d ); if( p == 0 ) return cmCancel; else { if( data != 0 ) p->setData( data ); ushort result = TProgram::deskTop->execView( p ); if( result != cmCancel && data != 0 ) p->getData( data ); TObject::destroy( p ); return result; } }